Fix running spell-checking in remote buffers
* lisp/textmodes/ispell.el (ispell-with-safe-default-directory): Don't use remote 'default-directory' when running the speller. (Bug#57649)
This commit is contained in:
parent
8ec7f8f169
commit
809afde01d
1 changed files with 2 additions and 1 deletions
|
@ -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))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue