[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/dired.el [emacs-unicode-2]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/dired.el [emacs-unicode-2] |
Date: |
Thu, 11 Nov 2004 22:02:21 -0500 |
Index: emacs/lisp/dired.el
diff -c emacs/lisp/dired.el:1.264.2.5 emacs/lisp/dired.el:1.264.2.6
*** emacs/lisp/dired.el:1.264.2.5 Thu Nov 4 08:55:37 2004
--- emacs/lisp/dired.el Fri Nov 12 02:52:52 2004
***************
*** 546,553 ****
(if current-prefix-arg
(read-string "Dired listing switches: "
dired-listing-switches))
! (read-directory-name (format "Dired %s(directory): " str)
! nil default-directory nil))))
;;;###autoload (define-key ctl-x-map "d" 'dired)
;;;###autoload
--- 546,559 ----
(if current-prefix-arg
(read-string "Dired listing switches: "
dired-listing-switches))
! ;; If a dialog is about to be used, call read-directory-name so
! ;; the dialog code knows we want directories. Some dialogs can
! ;; only select directories or files when popped up, not both.
! (if (next-read-file-uses-dialog-p)
! (read-directory-name (format "Dired %s(directory): " str)
! nil default-directory nil)
! (read-file-name (format "Dired %s(directory): " str)
! nil default-directory nil)))))
;;;###autoload (define-key ctl-x-map "d" 'dired)
;;;###autoload