aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/wdired.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/wdired.el b/lisp/wdired.el
index 1d0106775d6..be0bde290ab 100644
--- a/lisp/wdired.el
+++ b/lisp/wdired.el
@@ -611,7 +611,10 @@ Optional arguments are ignored."
611 (when (re-search-forward directory-listing-before-filename-regexp 611 (when (re-search-forward directory-listing-before-filename-regexp
612 (line-end-position) t) 612 (line-end-position) t)
613 (setq beg (point) 613 (setq beg (point)
614 end (line-end-position)) 614 end (if (and (file-symlink-p (dired-get-filename))
615 (search-forward " -> " (line-end-position) t))
616 (goto-char (match-beginning 0))
617 (line-end-position)))
615 (put-text-property beg end 'dired-filename t))))) 618 (put-text-property beg end 'dired-filename t)))))
616 619
617(defun wdired-next-line (arg) 620(defun wdired-next-line (arg)