diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-10-09 03:46:57 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-10-09 03:46:57 +0000 |
| commit | 51de78c1872d43ddf8a7cbcb772358563ec15bfa (patch) | |
| tree | 82fdac91cac00ae2bc79bbd3f7e319fd8733db67 /lisp/files.el | |
| parent | 49e4a58a708bb23541188a5a5a3df4ec8509b457 (diff) | |
| download | emacs-51de78c1872d43ddf8a7cbcb772358563ec15bfa.tar.gz | |
(hack-local-variables): If buffer has no file, display its buffer name.
Diffstat (limited to 'lisp/files.el')
| -rw-r--r-- | lisp/files.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index 92e0837157f..063377b5e49 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -972,7 +972,11 @@ If `enable-local-variables' is nil, this function does not check for a (beginning-of-line) (set-window-start (selected-window) (point))) (y-or-n-p (format "Set local variables as specified at end of %s? " - (file-name-nondirectory buffer-file-name)))))))) + (if buffer-file-name + (file-name-nondirectory + buffer-file-name) + (concat "buffer " + (buffer-name)))))))))) (let ((continue t) prefix prefixlen suffix beg (enable-local-eval enable-local-eval)) |
