changeset 66249:35d36d48eb91

(occur-engine): Add follow-link property.
author Romain Francoise <romain@orebokech.com>
date Thu, 20 Oct 2005 16:53:11 +0000
parents 6914d742203d
children a60dbc4e788d
files lisp/ChangeLog lisp/replace.el
diffstat 2 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Thu Oct 20 16:51:41 2005 +0000
+++ b/lisp/ChangeLog	Thu Oct 20 16:53:11 2005 +0000
@@ -108,6 +108,8 @@
 
 2005-10-20  Romain Francoise  <romain@orebokech.com>
 
+	* replace.el (occur-engine): Add follow-link property.
+
 	* font-core.el (font-lock-mode): Doc fix.
 
 2005-10-20  Kim F. Storm  <storm@cua.dk>
--- a/lisp/replace.el	Thu Oct 20 16:51:41 2005 +0000
+++ b/lisp/replace.el	Thu Oct 20 16:53:11 2005 +0000
@@ -1157,7 +1157,8 @@
 			    (insert "-------\n"))
 			  (add-text-properties
 			   beg end
-			   `(occur-target ,marker help-echo "mouse-2: go to this occurrence")))))
+			   `(occur-target ,marker follow-link t
+					  help-echo "mouse-2: go to this occurrence")))))
 		    (goto-char endpt))
 		  (if endpt
 		      (progn