diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2016-03-22 11:01:30 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2016-03-22 11:01:30 -0700 |
| commit | 37b9099068c10383e959ee366a52a22516846163 (patch) | |
| tree | f135528cdacc4313be84f7bf1ceade19327d5fe7 /lisp/dired-x.el | |
| parent | 6bd1e2203486ace170f5de15cf7d66146fc8cc87 (diff) | |
| parent | 56df61712ac446d3dcd9c897f687cc74a04be314 (diff) | |
| download | emacs-37b9099068c10383e959ee366a52a22516846163.tar.gz | |
-
Diffstat (limited to 'lisp/dired-x.el')
| -rw-r--r-- | lisp/dired-x.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/dired-x.el b/lisp/dired-x.el index e8cea85d988..be762e6e306 100644 --- a/lisp/dired-x.el +++ b/lisp/dired-x.el @@ -816,12 +816,11 @@ If in a Dired buffer, reverts it." (interactive) (if (file-exists-p dired-local-variables-file) (error "Old-style dired-local-variables-file `./%s' found; -replace it with a dir-locals-file `./%s.el'" +replace it with a dir-locals-file `./%s'" dired-local-variables-file dir-locals-file)) - (if (dir-locals--all-files default-directory) - (message "File `./%s' already exists." - (car (dir-locals--all-files default-directory))) + (if (file-exists-p dir-locals-file) + (message "File `./%s' already exists." dir-locals-file) (add-dir-local-variable 'dired-mode 'subdirs nil) (add-dir-local-variable 'dired-mode 'dired-omit-mode t) ;; Run extra-hooks and revert directory. |