Mercurial > emacs
changeset 102225:d79785ea1088
(ange-ftp-insert-directory): Adapt switch manipulation to 2009-02-11
change to dired-add-entry (Bug#2410).
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Mon, 23 Feb 2009 17:48:35 +0000 |
| parents | 211e39432f44 |
| children | d8af6ef02f83 |
| files | lisp/net/ange-ftp.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/net/ange-ftp.el Mon Feb 23 17:48:16 2009 +0000 +++ b/lisp/net/ange-ftp.el Mon Feb 23 17:48:35 2009 +0000 @@ -4478,7 +4478,7 @@ ;; then do an ls of current dir, which obviously won't work if we ;; want to ls a file. So instead, we get a full listing of the ;; parent directory and extract the line corresponding to `file'. - (when (string-match "d\\'" switches) + (when (string-match "-?d\\'" switches) ;; Remove "d" which dired added to `switches'. (setq switches (substring switches 0 (match-beginning 0)))) (let* ((dirlist (ange-ftp-ls (or (file-name-directory file) ".")