mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-27 07:37:33 +00:00
Code Issues Releases Activity

Fix running spell-checking in remote buffers

Browse Source 
* 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:
Eli Zaretskii 2022-09-17 10:10:10 +03:00
parent 8ec7f8f169
commit 809afde01d
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/textmodes/ispell.el
View File

@ -740,7 +740,8 @@ Otherwise returns the library directory name, if that is defined."
"Execute the forms in BODY with a reasonable `default-directory'." "Execute the forms in BODY with a reasonable `default-directory'."
(declare (indent 0) (debug t)) (declare (indent 0) (debug t))
`(let ((default-directory default-directory)) `(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 "~/"))) (setq default-directory (expand-file-name "~/")))
,@body)) ,@body))