[Emacs-diffs] Changes to emacs/lisp/gnus/message.el

[Miles Bader]

Index: emacs/lisp/gnus/message.el
diff -c emacs/lisp/gnus/message.el:1.67 emacs/lisp/gnus/message.el:1.68
*** emacs/lisp/gnus/message.el:1.67     Mon Oct 18 22:23:43 2004
--- emacs/lisp/gnus/message.el  Mon Nov  1 23:06:34 2004
***************
*** 587,592 ****
--- 587,593 ----
                non-word-constituents
                "]\\)+>+\\|[ \t]*[]>|}+]\\)+"))))
    "*Regexp matching the longest possible citation prefix on a line."
+   :version "21.4"
    :group 'message-insertion
    :link '(custom-manual "(message)Insertion Variables")
    :type 'regexp)
***************
*** 743,748 ****
--- 744,750 ----
    "*Envelope-from when sending mail with sendmail.
  If this is nil, use `user-mail-address'.  If it is the symbol
  `header', use the From: header of the message."
+   :version "21.4"
    :type '(choice (string :tag "From name")
                 (const :tag "Use From: header from message" header)
                 (const :tag "Use `user-mail-address'" nil))
***************
*** 855,861 ****
    (let ((map (make-sparse-keymap 'message-minibuffer-local-map)))
      (set-keymap-parent map minibuffer-local-map)
      map)
!   "Keymap for `message-read-from-minibuffer'.")
  
  ;;;###autoload
  (defcustom message-citation-line-function 'message-insert-citation-line
--- 857,864 ----
    (let ((map (make-sparse-keymap 'message-minibuffer-local-map)))
      (set-keymap-parent map minibuffer-local-map)
      map)
!   "Keymap for `message-read-from-minibuffer'."
!   :version "21.4")
  
  ;;;###autoload
  (defcustom message-citation-line-function 'message-insert-citation-line
***************
*** 1435,1440 ****
--- 1438,1444 ----
  
  (defcustom message-user-fqdn nil
    "*Domain part of Messsage-Ids."
+   :version "21.4"
    :group 'message-headers
    :link '(custom-manual "(message)News Headers")
    :type '(radio (const :format "%v  " nil)
***************
*** 6590,6595 ****
--- 6594,6600 ----
        '("^\\(Disposition-Notification-To\\|Return-Receipt-To\\):"
          . message-expand-name))
    "Alist of (RE . FUN).  Use FUN for completion on header lines matching RE."
+   :version "21.4"
    :group 'message
    :type '(alist :key-type regexp :value-type function))