Mercurial > emacs
changeset 74528:6be933449565
(wdired-preprocess-symlinks): Make the spaces after symlink arrows
read-only and non-rear-sticky.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Sat, 09 Dec 2006 16:15:26 +0000 |
| parents | 5f0d27048556 |
| children | 0d7ab079b8a6 |
| files | lisp/wdired.el |
| diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/wdired.el Sat Dec 09 16:15:14 2006 +0000 +++ b/lisp/wdired.el Sat Dec 09 16:15:26 2006 +0000 @@ -517,7 +517,10 @@ (1- (match-beginning 1)) 'old-link (match-string-no-properties 1)) (put-text-property (match-end 1) (1+ (match-end 1)) 'end-link t) - (put-text-property (1- (match-beginning 1)) + (put-text-property (1- (match-beginning 1)) + (match-beginning 1) + 'rear-nonsticky '(read-only)) + (put-text-property (match-beginning 1) (match-end 1) 'read-only nil))) (forward-line) (beginning-of-line)))))