diff options
| -rw-r--r-- | geiser-guile.el | 3 |
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)) |