diff options
Diffstat (limited to 'lisp/textmodes')
-rw-r--r-- | lisp/textmodes/ispell.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index 4b5ed98ecc9..b3fb326cf9b 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -740,7 +740,8 @@ Otherwise returns the library directory name, if that is defined." "Execute the forms in BODY with a reasonable `default-directory'." (declare (indent 0) (debug t)) `(let ((default-directory default-directory)) - (unless (file-accessible-directory-p default-directory) + (unless (and (not (file-remote-p default-directory)) + (file-accessible-directory-p default-directory)) (setq default-directory (expand-file-name "~/"))) ,@body)) |