Mercurial > emacs
changeset 7728:23f5b77e3773
(dired-get-filename): Get rid of text props from name.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 28 May 1994 12:13:21 +0000 |
| parents | 741ba17eeb20 |
| children | a1c07008521d |
| files | lisp/dired.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/dired.el Sat May 28 12:08:35 1994 +0000 +++ b/lisp/dired.el Sat May 28 12:13:21 1994 +0000 @@ -1094,7 +1094,7 @@ (if (setq p1 (dired-move-to-filename (not no-error-if-not-filep))) (setq p2 (dired-move-to-end-of-filename no-error-if-not-filep)))) ;; nil if no file on this line, but no-error-if-not-filep is t: - (if (setq file (and p1 p2 (buffer-substring p1 p2))) + (if (setq file (and p1 p2 (format "%s" (buffer-substring p1 p2)))) ;; Check if ls quoted the names, and unquote them. ;; Using read to unquote is much faster than substituting ;; \007 (4 chars) -> ^G (1 char) etc. in a lisp loop.