[Emacs-diffs] Changes to emacs/lisp/files.el,v

[Richard M. Stallman]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Richard M. Stallman <rms>       07/03/19 05:40:20

Index: files.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/files.el,v
retrieving revision 1.887
retrieving revision 1.888
diff -u -b -r1.887 -r1.888
--- files.el    5 Mar 2007 18:46:36 -0000       1.887
+++ files.el    19 Mar 2007 05:40:20 -0000      1.888
@@ -2445,6 +2445,7 @@
 (mapc (lambda (pair)
        (put (car pair) 'safe-local-variable (cdr pair)))
       '((buffer-read-only                . booleanp) ;; C source code
+       (default-directory               . stringp)  ;; C source code
        (fill-column                     . integerp) ;; C source code
        (indent-tabs-mode                . booleanp) ;; C source code
        (left-margin                     . integerp) ;; C source code
@@ -3681,7 +3682,7 @@
          (if (not (file-directory-p dir))
              (if (file-exists-p dir)
                  (error "%s is not a directory" dir)
-               (error "%s: no such directory" buffer-file-name))
+               (error "%s: no such directory" dir))
            (if (not (file-exists-p buffer-file-name))
                (error "Directory %s write-protected" dir)
              (if (yes-or-no-p