From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/14690 Path: main.gmane.org!not-for-mail From: Jari Aalto Newsgroups: gmane.emacs.gnus.general Subject: [patch] 0.37 gnus-group-mail/new arg composes mail to group Date: 19 Mar 1998 17:53:55 +0200 Sender: owner-ding@hpc.uh.edu Message-ID: Reply-To: NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 (generated by tm-edit 7.106) Content-Type: multipart/mixed; boundary="Multipart_Thu_Mar_19_17:53:53_1998-1" Content-Transfer-Encoding: 7bit X-Trace: main.gmane.org 1035153842 17684 80.91.224.250 (20 Oct 2002 22:44:02 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 22:44:02 +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 HAA27118 for ; Thu, 19 Mar 1998 07:54:47 -0800 Original-Received: from gizmo.hpc.uh.edu (gizmo.hpc.uh.edu [129.7.102.31]) by xemacs.org (8.8.5/8.8.5) with ESMTP id JAA23634 for ; Thu, 19 Mar 1998 09:55:23 -0600 (CST) Original-Received: from sina.hpc.uh.edu (sina.hpc.uh.edu [129.7.3.5]) by gizmo.hpc.uh.edu (8.7.6/8.7.3) with ESMTP id KAN31783; Thu, 19 Mar 1998 10:30:15 -0600 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Thu, 19 Mar 1998 09:54:22 -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 JAA28233 for ; Thu, 19 Mar 1998 09:54:14 -0600 (CST) Original-Received: (qmail 20302 invoked by uid 504); 19 Mar 1998 15:54:02 -0000 Original-Received: (qmail 20299 invoked from network); 19 Mar 1998 15:54:02 -0000 Original-Received: from axl01it.ntc.nokia.com (131.228.118.232) by claymore.vcinet.com with SMTP; 19 Mar 1998 15:54:01 -0000 Original-Received: from zeus.tele.nokia.fi (zeus.tele.nokia.fi [131.228.134.50]) by axl01it.ntc.nokia.com (8.8.5/8.6.9) with SMTP id RAA08574 for ; Thu, 19 Mar 1998 17:53:57 +0200 (EET) Original-Received: from tre.tele.nokia.fi (styx.ntc.nokia.com [131.228.169.57]) by zeus.tele.nokia.fi (8.6.4/8.6.4) with ESMTP id RAA15828 for ; Thu, 19 Mar 1998 17:57:36 +0200 Original-Received: by tre.tele.nokia.fi (1.39.111.2/16.2) id AA246502836; Thu, 19 Mar 1998 17:53:56 +0200 Original-To: Ding mailing list X-Info: Quassia Gnus v0.37 Original-Lines: 51 X-Mailer: Quassia Gnus v0.37/Emacs 19.34 Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:14690 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:14690 --Multipart_Thu_Mar_19_17:53:53_1998-1 Content-Type: text/plain; charset=US-ASCII I tried to find a command from the group buffer to post directly to the group without entering it; but I couldn't find one. In case it exists, please ignore this patch. It adds optional argument to group "H" command to start composing message directly to that group. This is convenient, when you want to send questions but not actually read the group at that time. jari --Multipart_Thu_Mar_19_17:53:53_1998-1 Content-Type: application/octet-stream; type=patch Content-Disposition: attachment; filename="gnus-msg.el.diff" Content-Transfer-Encoding: 7bit Prereq: 1.37 =================================================================== RCS file: RCS/gnus-msg.el,v retrieving revision 1.37 retrieving revision 1.38 diff -ubw -r1.37 -r1.38 --- 1.37 1998/03/19 15:47:31 +++ 1.38 1998/03/19 15:49:24 @@ -199,11 +199,12 @@ ;;; Post news commands of Gnus group mode and summary mode -(defun gnus-group-mail () - "Start composing a mail." - (interactive) - (gnus-setup-message 'message - (message-mail))) +(defun gnus-group-mail (&optional group) + "Start composing a mail. Optionally compose mail to GROUP." + (interactive "P") + (if group + (gnus-post-news 'post (gnus-group-group-name)) + (gnus-setup-message 'message (message-mail)))) (defun gnus-group-post-news (&optional arg) "Start composing a news message. --Multipart_Thu_Mar_19_17:53:53_1998-1--