[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp ChangeLog progmodes/etags.el
From: |
Chong Yidong |
Subject: |
[Emacs-diffs] emacs/lisp ChangeLog progmodes/etags.el |
Date: |
Sat, 31 Oct 2009 18:43:41 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Chong Yidong <cyd> 09/10/31 18:43:40
Modified files:
lisp : ChangeLog
lisp/progmodes : etags.el
Log message:
* progmodes/etags.el (etags-list-tags, etags-tags-apropos): Fix
face property (Bug#4834).
(etags-list-tags, etags-tags-apropos-additional)
(etags-tags-apropos, tags-select-tags-table): Add follow-link
property.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.16535&r2=1.16536
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/progmodes/etags.el?cvsroot=emacs&r1=1.214&r2=1.215
Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.16535
retrieving revision 1.16536
diff -u -b -r1.16535 -r1.16536
--- ChangeLog 31 Oct 2009 18:03:02 -0000 1.16535
+++ ChangeLog 31 Oct 2009 18:43:37 -0000 1.16536
@@ -1,5 +1,11 @@
2009-10-31 Chong Yidong <address@hidden>
+ * progmodes/etags.el (etags-list-tags, etags-tags-apropos): Fix
+ face property (Bug#4834).
+ (etags-list-tags, etags-tags-apropos-additional)
+ (etags-tags-apropos, tags-select-tags-table): Add follow-link
+ property.
+
* menu-bar.el (menu-bar-tools-menu): Add Semantic and EDE menu
items.
Index: progmodes/etags.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/progmodes/etags.el,v
retrieving revision 1.214
retrieving revision 1.215
diff -u -b -r1.214 -r1.215
--- progmodes/etags.el 1 Sep 2009 03:26:32 -0000 1.214
+++ progmodes/etags.el 31 Oct 2009 18:43:40 -0000 1.215
@@ -1402,7 +1402,8 @@
(tag-find-file-of-tag (button-get button
'file-path))
(widen)
(funcall goto-func tag-info)))
- 'face 'tags-tag-face
+ 'follow-link t
+ 'face tags-tag-face
'type 'button))
(terpri)
(forward-line 1))
@@ -1436,6 +1437,7 @@
(button-get
button 'item)))
'item sn
'face tags-tag-face
+ 'follow-link t
'type 'button)
(terpri))))))
(when (symbolp symbs)
@@ -1491,7 +1493,8 @@
(tag-find-file-of-tag (button-get
button 'file-path))
(widen)
(funcall goto-func tag-info)))
- 'face 'tags-tag-face
+ 'follow-link t
+ 'face tags-tag-face
'type 'button)))
(princ (format "- %s" file-label))
(with-current-buffer standard-output
@@ -1502,9 +1505,9 @@
;; Get the local value in the tags table
;; buffer before switching buffers.
(goto-char (point-min)))
- 'face 'tags-tag-face
- 'type 'button))
- ))
+ 'follow-link t
+ 'face tags-tag-face
+ 'type 'button))))
(terpri)
(forward-line 1))
(message nil))
@@ -1933,6 +1936,7 @@
(define-button-type 'tags-select-tags-table
'action 'select-tags-table-select
+ 'follow-link t
'help-echo "RET, t or mouse-2: select tags table")
;; XXX If a file is in multiple tables, selection may get the wrong one.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs/lisp ChangeLog progmodes/etags.el,
Chong Yidong <=