diff options
| author | Thien-Thi Nguyen <ttn@gnuvola.org> | 2006-02-07 10:08:23 +0000 |
|---|---|---|
| committer | Thien-Thi Nguyen <ttn@gnuvola.org> | 2006-02-07 10:08:23 +0000 |
| commit | 1b5053637e5137830b58fdb451c3eb150bccaae8 (patch) | |
| tree | 36546b19ced6f406857b1e024072fe2a79b9b018 /lisp/wdired.el | |
| parent | e1a67366be806369e37deb82749046b7c1b15109 (diff) | |
| download | emacs-1b5053637e5137830b58fdb451c3eb150bccaae8.tar.gz | |
(wdired-get-filename): Fix bug: Don't re-normalize OLD.
Diffstat (limited to 'lisp/wdired.el')
| -rw-r--r-- | lisp/wdired.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/wdired.el b/lisp/wdired.el index 2d5ceb58855..062706ec7dc 100644 --- a/lisp/wdired.el +++ b/lisp/wdired.el @@ -323,8 +323,8 @@ non-nil means return old filename." (if old (setq file (get-text-property beg 'old-name)) (setq end (next-single-property-change (1+ beg) 'end-name)) - (setq file (buffer-substring-no-properties (+ 2 beg) end))) - (and file (setq file (wdired-normalize-filename file)))) + (setq file (buffer-substring-no-properties (+ 2 beg) end)) + (and file (setq file (wdired-normalize-filename file))))) (if (or no-dir old) file (and file (> (length file) 0) |