branch: elpa/haskell-tng-mode
commit 52d984a2cfc7cf96fb3855e0efba92287b6d6cee
Author: Tseen She <ts33n....@gmail.com>
Commit: Tseen She <ts33n....@gmail.com>
fix cache typo
---
haskell-tng-hsinspect.el | 2 +-
haskell-tng-util.el | 4 ++--
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/haskell-tng-hsinspect.el b/haskell-tng-hsinspect.el
index 879cb51..6d50f03 100644
--- a/haskell-tng-hsinspect.el
+++ b/haskell-tng-hsinspect.el
@@ -157,7 +157,7 @@ A prefix argument ensures that caches are flushes."
haskell-tng--compile-dominating-project)
(haskell-tng--util-locate-dominating-file
haskell-tng--compile-dominating-package)))
- (haskell-tng-util-cached-disk
+ (haskell-tng--util-cached-disk
#'haskell-tng--hsinspect-which-hsinspect
(concat "which" (expand-file-name package-dir) "hsinspect")
nil
diff --git a/haskell-tng-util.el b/haskell-tng-util.el
index 30a6edb..3d296e4 100644
--- a/haskell-tng-util.el
+++ b/haskell-tng-util.el
@@ -105,7 +105,7 @@ consistency, it is recommended that commands using this
cache
flush the cache when the universal argument is provided."
(haskell-tng--util-cached-variable
(lambda ()
- (haskell-tng-util-cached-disk
+ (haskell-tng--util-cached-disk
work
key
no-work
@@ -141,7 +141,7 @@ RESET sets the variable to nil before doing anything."
(cached cached)))
;; TODO max-age (fallback to disk if WORK fails)
-(defun haskell-tng-util-cached-disk (work key &optional no-work reset)
+(defun haskell-tng--util-cached-disk (work key &optional no-work reset)
"A disk-based cache over a function WORK.
If the cache contains a file matching the KEY string (which must
