From: Simon Josefsson <jas@extundo.com>
Subject: Re: mouse-1 in group mode selects group?
Date: Mon, 29 Apr 2002 20:36:02 +0200 [thread overview]
Message-ID: <iluhelupd2l.fsf@extundo.com> (raw)
In-Reply-To: <ilug01e4b6d.fsf@extundo.com> (Simon Josefsson's message of "Mon, 29 Apr 2002 20:22:34 +0200")
Simon Josefsson <jas@extundo.com> writes:
> + gnus-mouse-1 gnus-mouse-pick-group
That patch wasn't very good, this one should work (and makes mouse-1
pick articles in the summary buffer as well):
Index: lisp/gnus-group.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/gnus-group.el,v
retrieving revision 6.73
diff -u -p -r6.73 gnus-group.el
--- lisp/gnus-group.el 2002/04/23 01:18:09 6.73
+++ lisp/gnus-group.el 2002/04/29 18:40:25
@@ -577,6 +577,7 @@ simple manner.")
"\C-c\C-i" gnus-info-find-node
"\M-e" gnus-group-edit-group-method
"^" gnus-group-enter-server-mode
+ gnus-mouse-1 gnus-mouse-pick-group
gnus-mouse-2 gnus-mouse-pick-group
"<" beginning-of-buffer
">" end-of-buffer
Index: lisp/gnus-sum.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/gnus-sum.el,v
retrieving revision 6.207
diff -u -p -r6.207 gnus-sum.el
--- lisp/gnus-sum.el 2002/04/17 08:54:21 6.207
+++ lisp/gnus-sum.el 2002/04/29 18:40:26
@@ -1565,6 +1565,7 @@ increase the score of each group you rea
"q" gnus-summary-exit
"Q" gnus-summary-exit-no-update
"\C-c\C-i" gnus-info-find-node
+ gnus-mouse-1 gnus-mouse-pick-article
gnus-mouse-2 gnus-mouse-pick-article
"m" gnus-summary-mail-other-window
"a" gnus-summary-post-news
Index: lisp/gnus-ems.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/gnus-ems.el,v
retrieving revision 6.20
diff -u -p -r6.20 gnus-ems.el
--- lisp/gnus-ems.el 2002/04/12 11:51:01 6.20
+++ lisp/gnus-ems.el 2002/04/29 18:40:27
@@ -32,6 +32,7 @@
;;; Function aliases later to be redefined for XEmacs usage.
+(defvar gnus-mouse-1 [mouse-1])
(defvar gnus-mouse-2 [mouse-2])
(defvar gnus-down-mouse-3 [down-mouse-3])
(defvar gnus-down-mouse-2 [down-mouse-2])
Index: lisp/gnus-xmas.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/gnus-xmas.el,v
retrieving revision 6.31
diff -u -p -r6.31 gnus-xmas.el
--- lisp/gnus-xmas.el 2002/02/13 04:10:06 6.31
+++ lisp/gnus-xmas.el 2002/04/29 18:40:27
@@ -91,6 +91,7 @@ Possibly the `etc' directory has not bee
(defvar gnus-summary-kill-menu)
(defvar gnus-article-article-menu)
(defvar gnus-article-treatment-menu)
+(defvar gnus-mouse-1)
(defvar gnus-mouse-2)
(defvar standard-display-table)
(defvar gnus-tree-minimize-window)
next prev parent reply other threads:[~2002-04-29 18:36 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2002-04-29 18:22 Simon Josefsson
2002-04-29 18:36 ` Simon Josefsson [this message]
2002-04-29 18:59 ` Reiner Steib
2002-04-29 19:06 ` Simon Josefsson
2002-04-29 19:52 ` Kai Großjohann
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=iluhelupd2l.fsf@extundo.com \
--to=jas@extundo.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).