# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1165680926 0
# Node ID 6be933449565f44cd2975f5eb47a216ad5e5b19c
# Parent  5f0d270485564b00d28712465db891747ae807a4
(wdired-preprocess-symlinks): Make the spaces after symlink arrows
read-only and non-rear-sticky.

diff -r 5f0d27048556 -r 6be933449565 lisp/wdired.el
--- 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)))))