diff options
| author | Karl Heuer | 1994-04-22 23:59:24 +0000 |
|---|---|---|
| committer | Karl Heuer | 1994-04-22 23:59:24 +0000 |
| commit | 6eaebaa27883a013a7b948e2b6e14dd8617dede5 (patch) | |
| tree | 7a32691b47090532e1c8c2ac781864b2f90f7a20 /lisp/textmodes | |
| parent | 49307295be79fd842e2780d0475f5af574050ce9 (diff) | |
| download | emacs-6eaebaa27883a013a7b948e2b6e14dd8617dede5.tar.gz emacs-6eaebaa27883a013a7b948e2b6e14dd8617dede5.zip | |
Pass operation to find-file-name-handler.
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/ispell4.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/textmodes/ispell4.el b/lisp/textmodes/ispell4.el index c47db01a230..147e3ea12b0 100644 --- a/lisp/textmodes/ispell4.el +++ b/lisp/textmodes/ispell4.el | |||
| @@ -283,7 +283,7 @@ q, \\[keyboard-quit] Leave the command loop. You can come back later with \\[is | |||
| 283 | (unwind-protect | 283 | (unwind-protect |
| 284 | (progn | 284 | (progn |
| 285 | (cond ((or (null filename) | 285 | (cond ((or (null filename) |
| 286 | (find-file-name-handler buffer-file-name)) | 286 | (find-file-name-handler buffer-file-name nil)) |
| 287 | (setq filename (make-temp-name "/usr/tmp/ispell")) | 287 | (setq filename (make-temp-name "/usr/tmp/ispell")) |
| 288 | (setq delete-temp t) | 288 | (setq delete-temp t) |
| 289 | (write-region (point-min) (point-max) filename)) | 289 | (write-region (point-min) (point-max) filename)) |