diff options
| author | Martin Rudalics <rudalics@gmx.at> | 2007-07-02 05:52:28 +0000 |
|---|---|---|
| committer | Martin Rudalics <rudalics@gmx.at> | 2007-07-02 05:52:28 +0000 |
| commit | 0fdc185e75d902a2fa368450359eef173ea5c3d4 (patch) | |
| tree | 5cb782e0ace324a142da63197add8874168133d2 /lisp/ffap.el | |
| parent | b1916c6edb49a5755f02c496a1c6b238d0d936d5 (diff) | |
| download | emacs-0fdc185e75d902a2fa368450359eef173ea5c3d4.tar.gz | |
(dired-at-point-prompter): Improve prompt in
list-directory case.
Diffstat (limited to 'lisp/ffap.el')
| -rw-r--r-- | lisp/ffap.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ffap.el b/lisp/ffap.el index 5bba729fce3..314d48e9ca8 100644 --- a/lisp/ffap.el +++ b/lisp/ffap.el @@ -1793,7 +1793,11 @@ ffap most of the time." ;; Extra complication for the temporary highlighting. (unwind-protect (ffap-read-file-or-url - (if ffap-url-regexp "Dired file or URL: " "Dired file: ") + (cond + ((eq ffap-directory-finder 'list-directory) + "List directory (brief): ") + (ffap-url-regexp "Dired file or URL: ") + (t "Dired file: ")) (prog1 (setq guess (or guess (let ((guess (ffap-guesser))) |