branch: elpa/haskell-tng-mode
commit f648cf9db4212985fd2a7149c128d5de742f8964
Author: Tseen She <ts33n....@gmail.com>
Commit: Tseen She <ts33n....@gmail.com>
fallback to current directory (e.g. for cabal scripts)
---
haskell-tng-compile.el | 8 +++++---
1 file changed, 5 insertions(+), 3 deletions(-)
diff --git a/haskell-tng-compile.el b/haskell-tng-compile.el
index e83e482..e06e69f 100644
--- a/haskell-tng-compile.el
+++ b/haskell-tng-compile.el
@@ -101,9 +101,11 @@ will cause the subsequent call to prompt."
(setq haskell-tng--compile-command
(unless (equal command haskell-tng--compile-alt) command))
- (when-let (default-directory
- (haskell-tng--util-locate-dominating-file
- haskell-tng--compile-dominating-file))
+ (let ((default-directory
+ (or
+ (haskell-tng--util-locate-dominating-file
+ haskell-tng--compile-dominating-file)
+ default-directory)))
(compilation-start
command
'haskell-tng-compilation-mode
