From: Reiner Steib <4.uce.03.r.s@nurfuerspam.de>
Subject: defcustoms without group declaration (was: Gnus 5.10 is now on the trunk)
Date: Wed, 08 Sep 2004 20:18:54 +0200 [thread overview]
Message-ID: <v9vfeowrn5.fsf@marauder.physik.uni-ulm.de> (raw)
In-Reply-To: m3r7pdrc83.fsf@kfs-l.imdomain.dk
[-- Attachment #1: Type: text/plain, Size: 617 bytes --]
[ Including <ding@gnus.org> ]
On Tue, Sep 07 2004, Kim F. Storm wrote:
> The following gnus related variables do not have a :group (or
> :variable-group) declaration, so they end up in the 'nil' group:
>
> gnus-parameter-to-address-alist
> gnus-parameter-go-list-alist
> gnus-parameter-subscribed-alist
> gnus-parameter-large-newsgroup-initial-alist
> mml-signencrypt-style-alist
> nntp-authinfo-file
> mml2015-unabbrev-trust-alist
>
> Can you pls. advise which group each of these belong to ?
Thanks for pointing this out. I have commit the attached patch. If
someone has a better suggestion, please speak up.
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: rs-Custom-nil.patch --]
[-- Type: text/x-patch, Size: 5181 bytes --]
cvs diff: Diffing .
Index: ChangeLog
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/ChangeLog,v
retrieving revision 1.253
diff -u -r1.253 ChangeLog
--- ChangeLog 7 Sep 2004 03:47:58 -0000 1.253
+++ ChangeLog 8 Sep 2004 18:17:09 -0000
@@ -1,3 +1,19 @@
+2004-09-08 Reiner Steib <Reiner.Steib@gmx.de>
+
+ * nntp.el (nntp): New customization group.
+ (nntp-authinfo-file): Added customization group.
+
+ * mml2015.el (mml2015-unabbrev-trust-alist): Added customization
+ group.
+
+ * mml-sec.el (mml-signencrypt-style-alist): Ditto.
+
+ * gnus.el (to-address, to-list, subscribed)
+ (large-newsgroup-initial): Ditto.
+
+ * flow-fill.el (fill-flowed-display-column)
+ (fill-flowed-encode-column): Ditto.
+
2004-09-06 Stefan <monnier@iro.umontreal.ca>
* message.el (message-tokenize-header, message-send-mail-with-qmail):
Index: flow-fill.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/flow-fill.el,v
retrieving revision 1.5
diff -u -r1.5 flow-fill.el
--- flow-fill.el 4 Sep 2004 13:13:43 -0000 1.5
+++ flow-fill.el 8 Sep 2004 18:17:09 -0000
@@ -56,6 +56,7 @@
(defcustom fill-flowed-display-column 'fill-column
"Column beyond which format=flowed lines are wrapped, when displayed.
This can be a Lisp expression or an integer."
+ :group 'mime-display
:type '(choice (const :tag "Standard `fill-column'" fill-column)
(const :tag "Fit Window" (- (window-width) 5))
(sexp)
@@ -65,6 +66,7 @@
"Column beyond which format=flowed lines are wrapped, in outgoing messages.
This can be a Lisp expression or an integer.
RFC 2646 suggests 66 characters for readability."
+ :group 'mime-display
:type '(choice (const :tag "Standard fill-column" fill-column)
(const :tag "RFC 2646 default (66)" 66)
(sexp)
Index: gnus.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/gnus.el,v
retrieving revision 1.28
diff -u -r1.28 gnus.el
--- gnus.el 4 Sep 2004 13:13:43 -0000 1.28
+++ gnus.el 8 Sep 2004 18:17:10 -0000
@@ -1599,6 +1599,7 @@
"Return GROUP's to-address."
:variable-document
"*Alist of group regexps and correspondent to-addresses."
+ :variable-group gnus-group-parameter
:parameter-type '(gnus-email-address :tag "To Address")
:parameter-document "\
This will be used when doing followups and posts.
@@ -1625,6 +1626,7 @@
"Return GROUP's to-list."
:variable-document
"*Alist of group regexps and correspondent to-lists."
+ :variable-group gnus-group-parameter
:parameter-type '(gnus-email-address :tag "To List")
:parameter-document "\
This address will be used when doing a `a' in the group.
@@ -1643,6 +1645,7 @@
"Return GROUP's subscription status."
:variable-document
"*Groups which are automatically considered subscribed."
+ :variable-group gnus-group-parameter
:parameter-type '(const :tag "Subscribed" t)
:parameter-document "\
Gnus assumed that you are subscribed to the To/List address.
@@ -1749,6 +1752,7 @@
"Return GROUP's initial input of the number of articles."
:variable-document
"*Alist of group regexps and its initial input of the number of articles."
+ :variable-group gnus-group-parameter
:parameter-type '(choice :tag "Initial Input for Large Newsgroup"
(const :tag "All" nil)
(integer))
Index: mml-sec.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/mml-sec.el,v
retrieving revision 1.2
diff -u -r1.2 mml-sec.el
--- mml-sec.el 4 Sep 2004 13:13:43 -0000 1.2
+++ mml-sec.el 8 Sep 2004 18:17:11 -0000
@@ -83,6 +83,7 @@
understood by all PGP implementations, in particular PGP version
2 does not support it! See Info node `(message)Security' for
details."
+ :group 'message
:type '(repeat (list (choice (const :tag "S/MIME" "smime")
(const :tag "PGP" "pgp")
(const :tag "PGP/MIME" "pgpmime")
Index: mml2015.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/mml2015.el,v
retrieving revision 1.2
diff -u -r1.2 mml2015.el
--- mml2015.el 4 Sep 2004 13:13:43 -0000 1.2
+++ mml2015.el 8 Sep 2004 18:17:11 -0000
@@ -83,6 +83,7 @@
("TRUST_FULLY" . t)
("TRUST_ULTIMATE" . t))
"Map GnuPG trust output values to a boolean saying if you trust the key."
+ :group 'mime-security
:type '(repeat (cons (regexp :tag "GnuPG output regexp")
(boolean :tag "Trust key"))))
Index: nntp.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/gnus/nntp.el,v
retrieving revision 1.22
diff -u -r1.22 nntp.el
--- nntp.el 4 Sep 2004 13:13:44 -0000 1.22
+++ nntp.el 8 Sep 2004 18:17:11 -0000
@@ -34,6 +34,10 @@
(eval-when-compile (require 'cl))
+(defgroup nntp nil
+ "NNTP access for Gnus."
+ :group 'gnus)
+
(defvoo nntp-address nil
"Address of the physical nntp server.")
@@ -182,6 +186,7 @@
(defcustom nntp-authinfo-file "~/.authinfo"
".netrc-like file that holds nntp authinfo passwords."
+ :group 'nntp
:type
'(choice file
(repeat :tag "Entries"
[-- Attachment #3: Type: text/plain, Size: 114 bytes --]
Bye, Reiner.
--
,,,
(o o)
---ooO-(_)-Ooo--- | PGP key available | http://rsteib.home.pages.de/
[-- Attachment #4: Type: text/plain, Size: 142 bytes --]
_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel
next prev parent reply other threads:[~2004-09-08 18:18 UTC|newest]
Thread overview: 53+ messages / expand[flat|nested] mbox.gz Atom feed top
2004-08-12 23:54 Gnus branch Stefan Monnier
2004-08-13 0:08 ` David Kastrup
2004-08-13 23:58 ` Richard Stallman
2004-08-18 12:48 ` Reiner Steib
2004-08-19 18:05 ` Richard Stallman
2004-08-19 18:26 ` Stefan Monnier
2004-08-20 21:08 ` Richard Stallman
2004-08-22 21:06 ` Reiner Steib
2004-08-22 21:06 ` Reiner Steib
2004-08-30 21:51 ` Reiner Steib
2004-08-30 23:46 ` Katsumi Yamaoka
2004-08-31 22:55 ` Katsumi Yamaoka
2004-08-31 22:06 ` Richard Stallman
2004-08-31 22:46 ` Miles Bader
2004-09-01 7:49 ` Reiner Steib
2004-09-04 13:24 ` Gnus 5.10 is now on the trunk Miles Bader
2004-09-05 17:45 ` Reiner Steib
2004-09-05 23:10 ` Miles Bader
2004-09-07 3:43 ` Richard Stallman
2004-09-07 4:28 ` Miles Bader
2004-09-08 0:22 ` Richard Stallman
2004-09-07 15:01 ` Lars Magne Ingebrigtsen
2004-09-07 21:38 ` Kim F. Storm
2004-09-08 18:18 ` Reiner Steib [this message]
2004-09-08 0:22 ` Richard Stallman
2004-09-08 10:33 ` Lars Magne Ingebrigtsen
2004-09-06 2:08 ` Sam Steingold
2004-09-06 2:54 ` Miles Bader
2004-09-06 17:58 ` Reiner Steib
2004-09-07 0:15 ` Sam Steingold
2004-09-09 13:32 ` Gnus image problem (was: Gnus 5.10 is now on the trunk) Reiner Steib
2004-09-07 0:22 ` Gnus 5.10 is now on the trunk Miles Bader
2004-09-09 10:11 ` Miles Bader
2004-09-09 13:33 ` Where to put images for lisp packages? (was: Gnus 5.10 is now on the trunk) Reiner Steib
2004-09-09 23:28 ` Where to put images for lisp packages? Miles Bader
2004-09-23 16:22 ` Reiner Steib
2004-10-06 18:42 ` Reiner Steib
2004-10-07 1:03 ` Miles Bader
2004-10-07 7:22 ` Reiner Steib
2004-09-09 14:19 ` Gnus version numbers (was: Gnus 5.10 is now on the trunk) Reiner Steib
2004-09-09 15:49 ` Gnus version numbers Lars Magne Ingebrigtsen
2004-09-10 12:29 ` Reiner Steib
2004-09-10 13:48 ` Lars Magne Ingebrigtsen
2004-09-10 17:49 ` Stefan Monnier
2004-09-10 18:04 ` Lars Magne Ingebrigtsen
2004-09-13 17:20 ` Reiner Steib
2004-09-13 18:29 ` Lars Magne Ingebrigtsen
2004-09-14 9:49 ` Per Abrahamsen
2004-08-22 20:55 ` Gnus branch Reiner Steib
[not found] ` <E1Bz9hx-0003St-5X@fencepost.gnu.org>
2004-08-23 13:17 ` Reiner Steib
2004-08-23 23:52 ` Richard Stallman
2004-08-24 8:48 ` Reiner Steib
2004-08-25 4:40 ` Richard Stallman
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
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=v9vfeowrn5.fsf@marauder.physik.uni-ulm.de \
--to=4.uce.03.r.s@nurfuerspam.de \
--cc=Reiner.Steib@gmx.de \
/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.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
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 read-only IMAP folder(s) and NNTP newsgroup(s).