mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-16 17:19:41 +00:00
Code Issues Releases Activity

(dired-desktop-buffer-misc-data, dired-restore-desktop-buffer):

Browse Source 
Delete duplicate words.
This commit is contained in:
Juri Linkov 2005-07-18 15:18:33 +00:00
parent 9b05fb2280
commit 9d9ee410b8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/dired.el
View File

@ -3262,7 +3262,7 @@ Ask means pop up a menu for the user to select one of copy, move or link."
;; Directory name followed by list of files.
(cons (desktop-file-name (car dired-directory) desktop-dirname)
(cdr dired-directory))
;; Directory name, optionally with with shell wildcard.
;; Directory name, optionally with shell wildcard.
(desktop-file-name dired-directory desktop-dirname))
;; Subdirectories in `dired-subdir-alist'.
(cdr
@ -3277,7 +3277,7 @@ Ask means pop up a menu for the user to select one of copy, move or link."
desktop-buffer-misc)
"Restore a dired buffer specified in a desktop file."
;; First element of `desktop-buffer-misc' is the value of `dired-directory'.
;; This value is a directory name, optionally with with shell wildcard or
;; This value is a directory name, optionally with shell wildcard or
;; a directory name followed by list of files.
(let* ((dired-dir (car desktop-buffer-misc))
(dir (if (consp dired-dir) (car dired-dir) dired-dir)))