From 0a6d03627fa8d7b018d91d7a0af1c15a72a26310 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 25 Nov 2004 03:06:16 +0000 Subject: [PATCH] (ispell-check-version): If default-directory is nonexistent, use home dir. --- lisp/textmodes/ispell.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index d221d39180f..f6a1c1d5cce 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -769,6 +769,8 @@ Otherwise returns the library directory name, if that is defined." (if buf (kill-buffer buf))) (set-buffer (get-buffer-create " *ispell-tmp*")) (erase-buffer) + (unless (file-exists-p default-directory) + (setq default-directory (expand-file-name "~/"))) (setq status (call-process ispell-program-name nil t nil ;; aspell doesn't accept the -vv switch. -- 2.39.2