* gnus-sieve.el (gnus-sieve-crosspost): Fix type.

* message.el (message-make-forward-subject-function): Add
message-forward-subject-name-subject to choices.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0fea0ee..da59320 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,10 @@
 2003-08-20  Jesper Harder  <harder@ifa.au.dk>
 
+       * gnus-sieve.el (gnus-sieve-crosspost): Fix type.
+
+       * message.el (message-make-forward-subject-function): Add
+       message-forward-subject-name-subject to choices.
+
        * gnus-art.el (gnus-article-edit-done, gnus-article-edit-exit):
        Redisplay article after editing.
 

diff --git a/lisp/gnus-sieve.el b/lisp/gnus-sieve.el
index b11ade5..824e66c 100644 (file)
--- a/lisp/gnus-sieve.el
+++ b/lisp/gnus-sieve.el
@@ -66,7 +66,7 @@ For example: \"nnimap:mailbox\""
 
 (defcustom gnus-sieve-crosspost t
   "Whether the generated Sieve script should do crossposting."
-  :type 'bool
+  :type 'boolean
   :group 'gnus-sieve)
 
 (defcustom gnus-sieve-update-shell-command "echo put %f | sieveshell %s"

diff --git a/lisp/message.el b/lisp/message.el
index fac1d49..abd30b9 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -457,6 +457,7 @@ The provided functions are:
   :group 'message-forwarding
   :type '(radio (function-item message-forward-subject-author-subject)
                (function-item message-forward-subject-fwd)
+               (function-item message-forward-subject-name-subject)
                (repeat :tag "List of functions" function)))
 
 (defcustom message-forward-as-mime t