From: Reiner Steib <reinersteib+gmane@imap.cc>
To: info-gnus-english@gnu.org
Subject: Re: Changing gnus-user-agent and showing all headers?
Date: Sun, 04 Nov 2007 00:22:23 +0100 [thread overview]
Message-ID: <v9wssyrk28.fsf@marauder.physik.uni-ulm.de> (raw)
In-Reply-To: <87d4urrnyi.fsf@topper.koldfront.dk>
On Sat, Nov 03 2007, Adam Sjøgren wrote:
> On 04 Nov 2007 08:37:19 +1100, andrew wrote:
>> (setq gnus-user-agent 'emacs-gnus-type)
[...]
>> but this does not work so my syntax is wrong?
Andrew, if your Gnus is ...
| User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.4
... then, setting `gnus-user-agent' has no effect at all.
> I think so, cf. the documentation of gnus-user-agent:
>
> ,----[ C-h v gnus-user-agent RET ]
> | `gnus-user-agent' is a variable declared in Lisp.
> | -- loaded from "gnus"
> |
> | Value: (emacs gnus type)
[...]
> (Note, I am using No Gnus, I haven't checked if this is the same in
> older Gnusae).
`gnus-user-agent' was introduced on 2003-02-24. Later I changed it to
use a list instead of a single symbol and added (hopefully)
appropriate conversion code:
;; Convert old (No Gnus < 2005-01-10, v5-10 < 2005-09-05) symbol type values:
(when (symbolp gnus-user-agent)
(setq gnus-user-agent
(cond ((eq gnus-user-agent 'emacs-gnus-config)
'(emacs gnus config))
((eq gnus-user-agent 'emacs-gnus-type)
'(emacs gnus type))
((eq gnus-user-agent 'emacs-gnus)
'(emacs gnus))
((eq gnus-user-agent 'gnus)
'(gnus))
(t gnus-user-agent)))
(gnus-message 1 "Converted `gnus-user-agent' to `%s'." gnus-user-agent)
(sit-for 1)
(if (get 'gnus-user-agent 'saved-value)
(customize-save-variable 'gnus-user-agent gnus-user-agent)
(gnus-message 1 "Edit your init file to make this change permanent.")
(sit-for 2)))
Bye, Reiner.
--
,,,
(o o)
---ooO-(_)-Ooo--- | PGP key available | http://rsteib.home.pages.de/
next prev parent reply other threads:[~2007-11-03 23:22 UTC|newest]
Thread overview: 11+ messages / expand[flat|nested] mbox.gz Atom feed top
2007-11-03 21:37 andrew
2007-11-03 21:58 ` Adam Sjøgren
2007-11-03 22:42 ` andrew
2007-11-03 22:56 ` Adam Sjøgren
2007-11-03 23:03 ` andrew
2007-11-03 23:07 ` Adam Sjøgren
2007-11-03 23:58 ` andrew
2007-11-03 23:08 ` andrew
2007-11-03 23:22 ` Reiner Steib [this message]
2007-11-04 21:32 ` andrew
2007-11-03 22:05 ` Joachim Reiter
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=v9wssyrk28.fsf@marauder.physik.uni-ulm.de \
--to=reinersteib+gmane@imap.cc \
--cc=Reiner.Steib@gmx.de \
--cc=info-gnus-english@gnu.org \
/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).