Gnus development mailing list
 help / color / mirror / Atom feed
From: Julien GILLES <julien.gilles@bcv01y01.vz.cit.alcatel.fr>
Subject: My first lisp function for Gnus
Date: 21 Jan 2000 12:23:47 +0100	[thread overview]
Message-ID: <tnzotzsm64.fsf@bcv01xc7.vz.cit.alcatel.fr> (raw)


Well, it's not a revolution for Gnus World, but for me :-) 

In the Customize view of a group, there is an admin-adress field that
is not used, it is there only for convenience. 

I think that this adress should be automatically used for sending
messages to the mailing list server associated to the group.

(defun gnus-mail-admin-address ()
  "Compose mail for admin adress of a mailing list."
  (interactive)
  (let ((adress (gnus-group-find-parameter 
		 gnus-newsgroup-name 'admin-address)))
    (cond (adress (gnus-setup-message 'message (message-mail adress)))
	  (t (display-message 'error "no admin adress")))))

(gnus-define-keys gnus-summary-mode-map "\C-ca" gnus-mail-admin-address)

- AFAK, "Control-c a" is not used. Another better keys ?
- Feel free to modify/correct/change this code, if something is not
  done the right way. 

regards

-- 
Julien Gilles.



             reply	other threads:[~2000-01-21 11:23 UTC|newest]

Thread overview: 14+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2000-01-21 11:23 Julien GILLES [this message]
2000-01-21 11:38 ` Roman Belenov
2000-01-21 12:11   ` Julien GILLES
2000-01-21 12:41     ` Arvid Grøtting
2000-01-21 12:54       ` Julien GILLES
2000-01-21 13:02     ` Didier Verna
2000-01-22  3:24       ` Mailing list handling wishlist Russ Allbery
2000-01-21 12:18   ` My first lisp function for Gnus Kai Großjohann
2000-01-21 12:05 ` Arvid Grøtting
2000-01-21 12:17   ` Julien GILLES
2000-01-21 12:35     ` Arvid Grøtting
2000-01-21 14:07       ` Per Abrahamsen
2000-01-25 17:22         ` Justin Sheehy
2000-01-26 14:45           ` Per Abrahamsen

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=tnzotzsm64.fsf@bcv01xc7.vz.cit.alcatel.fr \
    --to=julien.gilles@bcv01y01.vz.cit.alcatel.fr \
    /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).