[Fix #580] Don't check for the lein command presence on remote hosts

1 files changed, 6 insertions, 3 deletions

diff --git a/cider.el b/cider.el
index b6d5edc8..99b96538 100644
--- a/cider.el
+++ b/cider.el
@@ -92,9 +92,12 @@ This variable is used by the CIDER command."
   :group 'cider)
 
 (defun cider--lein-present-p ()
-  "Check if `cider-lein-command' is on the `exec-path'."
-  (or (executable-find cider-lein-command)
-      (executable-find (concat cider-lein-command ".bat"))))
+  "Check if `cider-lein-command' is on the `exec-path'.
+
+In case `default-directory' is non-local we assume the command is available."
+  ((or (file-remote-p default-directory)
+       (executable-find cider-lein-command)
+       (executable-find (concat cider-lein-command ".bat")))))
 
 ;;;###autoload
 (defun cider-version ()