aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKim F. Storm2004-12-17 15:20:06 +0000
committerKim F. Storm2004-12-17 15:20:06 +0000
commit132cf96dff182358577c15bcd401eb3cd9bd6f4a (patch)
treeec232c4bc01731566327eab020c5feb0003ffb6f
parent1c4976249b4116dc1fce6ac00fc2cc81ea2f7214 (diff)
downloademacs-132cf96dff182358577c15bcd401eb3cd9bd6f4a.tar.gz
emacs-132cf96dff182358577c15bcd401eb3cd9bd6f4a.zip
(gnus-summary-mode-map): Map follow-link to mouse-face.
-rw-r--r--lisp/gnus/gnus-sum.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index 03e1624237e..c4f320e888b 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -1703,6 +1703,7 @@ increase the score of each group you read."
1703 "Q" gnus-summary-exit-no-update 1703 "Q" gnus-summary-exit-no-update
1704 "\C-c\C-i" gnus-info-find-node 1704 "\C-c\C-i" gnus-info-find-node
1705 gnus-mouse-2 gnus-mouse-pick-article 1705 gnus-mouse-2 gnus-mouse-pick-article
1706 [follow-link] mouse-face
1706 "m" gnus-summary-mail-other-window 1707 "m" gnus-summary-mail-other-window
1707 "a" gnus-summary-post-news 1708 "a" gnus-summary-post-news
1708 "i" gnus-summary-news-other-window 1709 "i" gnus-summary-news-other-window
@@ -5096,7 +5097,7 @@ If SELECT-ARTICLES, only select those articles from GROUP."
5096 5097
5097 (when gnus-agent 5098 (when gnus-agent
5098 (gnus-agent-possibly-alter-active group (gnus-active group) info) 5099 (gnus-agent-possibly-alter-active group (gnus-active group) info)
5099 5100
5100 (setq gnus-summary-use-undownloaded-faces 5101 (setq gnus-summary-use-undownloaded-faces
5101 (gnus-agent-find-parameter 5102 (gnus-agent-find-parameter
5102 group 5103 group
@@ -7044,7 +7045,7 @@ If optional argument UNREAD is non-nil, only unread article is selected."
7044 (gnus-summary-goto-subject article t))) 7045 (gnus-summary-goto-subject article t)))
7045 (gnus-summary-limit (append articles gnus-newsgroup-limit)) 7046 (gnus-summary-limit (append articles gnus-newsgroup-limit))
7046 (gnus-summary-position-point)) 7047 (gnus-summary-position-point))
7047 7048
7048(defun gnus-summary-goto-subject (article &optional force silent) 7049(defun gnus-summary-goto-subject (article &optional force silent)
7049 "Go the subject line of ARTICLE. 7050 "Go the subject line of ARTICLE.
7050If FORCE, also allow jumping to articles not currently shown." 7051If FORCE, also allow jumping to articles not currently shown."
@@ -9140,7 +9141,7 @@ ACTION can be either `move' (the default), `crosspost' or `copy'."
9140 9141
9141 ;;;!!!Why is this necessary? 9142 ;;;!!!Why is this necessary?
9142 (set-buffer gnus-summary-buffer) 9143 (set-buffer gnus-summary-buffer)
9143 9144
9144 (gnus-summary-goto-subject article) 9145 (gnus-summary-goto-subject article)
9145 (when (eq action 'move) 9146 (when (eq action 'move)
9146 (gnus-summary-mark-article article gnus-canceled-mark)))) 9147 (gnus-summary-mark-article article gnus-canceled-mark))))