summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--geiser-guile.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/geiser-guile.el b/geiser-guile.el
index a47898f..be7eac2 100644
--- a/geiser-guile.el
+++ b/geiser-guile.el
@@ -174,7 +174,8 @@ this location for further cleanup.")
If using a remote Tramp buffer, this function will copy the modules to a
temporary location in the remote server and the return it.
Else, will just return `geiser-guile-scheme-dir'."
- (cond ((not (tramp-tramp-file-p default-directory)) geiser-guile-scheme-dir)
+ (cond ((not (and (fboundp 'tramp-tramp-file-p)
+ (tramp-tramp-file-p default-directory))) geiser-guile-scheme-dir)
(geiser-guile-scheme-local-dir) ;; remote files are already there
(t
(let* ((temporary-file-directory (temporary-file-directory))