From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/14358 Path: main.gmane.org!not-for-mail From: jdc@chow.mat.jhu.edu (Dan Christensen) Newsgroups: gmane.emacs.gnus.general Subject: jump and select Date: Sat, 28 Feb 1998 16:19:20 -0500 Sender: owner-ding@hpc.uh.edu Message-ID: NNTP-Posting-Host: coloc-standby.netfonds.no X-Trace: main.gmane.org 1035153562 14445 80.91.224.250 (20 Oct 2002 22:39:22 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 22:39:22 +0000 (UTC) Return-Path: Original-Received: from xemacs.org (xemacs.cs.uiuc.edu [128.174.252.16]) by altair.xemacs.org (8.8.8/8.8.8) with ESMTP id NAA13456 for ; Sat, 28 Feb 1998 13:24:56 -0800 Original-Received: from sina.hpc.uh.edu (root@Sina.HPC.UH.EDU [129.7.3.5]) by xemacs.org (8.8.5/8.8.5) with ESMTP id PAA16655 for ; Sat, 28 Feb 1998 15:20:43 -0600 (CST) Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5]) by sina.hpc.uh.edu (8.7.3/8.7.3) with ESMTP id PAH07497; Sat, 28 Feb 1998 15:20:39 -0600 (CST) Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Sat, 28 Feb 1998 15:19:55 -0600 (CST) Original-Received: from claymore.vcinet.com (claymore.vcinet.com [208.205.12.23]) by sina.hpc.uh.edu (8.7.3/8.7.3) with SMTP id PAA07484 for ; Sat, 28 Feb 1998 15:19:47 -0600 (CST) Original-Received: (qmail 28481 invoked by uid 504); 28 Feb 1998 21:19:39 -0000 Original-Received: (qmail 28478 invoked from network); 28 Feb 1998 21:19:39 -0000 Original-Received: from jhuml1.hcf.jhu.edu (128.220.2.86) by claymore.vcinet.com with SMTP; 28 Feb 1998 21:19:39 -0000 Original-Received: from chow.mat.jhu.edu by jhmail.hcf.jhu.edu (PMDF V5.1-10 #18666) with ESMTP id <01IU4B70RQSOB4SWGH@jhmail.hcf.jhu.edu> for ding@gnus.org; Sat, 28 Feb 1998 16:17:36 EDT Original-Received: (from jdc@localhost) by chow.mat.jhu.edu (8.7.6/8.7.3) id QAA23051; Sat, 28 Feb 1998 16:19:20 -0500 (EST) Original-To: ding@gnus.org X-Mailer: Quassia Gnus v0.34/Emacs 19.34 Original-Lines: 75 Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:14358 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:14358 The following patch adds an optional argument to gnus-group-jump-to-group which asks it to select the group it is jumping to. So if the user types `C-u j', he or she will be prompted for a group-name which will then be selected. 1) Is this a good way to get this functionality? 2) If so, can this patch be applied? Dan *** gnus-group.el Sat Feb 28 16:03:13 1998 --- gnus-group.el.orig Sat Feb 28 15:58:30 1998 *************** *** 1619,1649 **** group) ;;(error nil) (quit nil))))) ! (defun gnus-group-jump-to-group (group &optional select) "Jump to newsgroup GROUP." (interactive (list (completing-read "Group: " gnus-active-hashtb nil (gnus-read-active-file-p) nil ! 'gnus-group-history) ! current-prefix-arg)) (when (equal group "") (error "Empty group name")) ! (if select ! (gnus-group-read-group t t group) ! (unless (gnus-ephemeral-group-p group) ;; Either go to the line in the group buffer... (unless (gnus-group-goto-group group) ;; ... or insert the line. (gnus-group-update-group group) (gnus-group-goto-group group))) ;; Adjust cursor point. ! (gnus-group-position-point))) (defun gnus-group-goto-group (group &optional far) "Goto to newsgroup GROUP. If FAR, it is likely that the group is not on the current line." --- 1619,1646 ---- group) ;;(error nil) (quit nil))))) ! (defun gnus-group-jump-to-group (group) "Jump to newsgroup GROUP." (interactive (list (completing-read "Group: " gnus-active-hashtb nil (gnus-read-active-file-p) nil ! 'gnus-group-history))) (when (equal group "") (error "Empty group name")) ! (unless (gnus-ephemeral-group-p group) ;; Either go to the line in the group buffer... (unless (gnus-group-goto-group group) ;; ... or insert the line. (gnus-group-update-group group) (gnus-group-goto-group group))) ;; Adjust cursor point. ! (gnus-group-position-point)) (defun gnus-group-goto-group (group &optional far) "Goto to newsgroup GROUP. If FAR, it is likely that the group is not on the current line."