/[emacs]/emacs/lisp/gnus/message.el
ViewVC logotype

Diff of /emacs/lisp/gnus/message.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.55.4.6 by miles, Fri Oct 22 10:13:32 2004 UTC revision 1.55.4.7 by miles, Thu Nov 4 08:55:30 2004 UTC
# Line 587  Done before generating the new subject o Line 587  Done before generating the new subject o
587                  non-word-constituents                  non-word-constituents
588                  "]\\)+>+\\|[ \t]*[]>|}+]\\)+"))))                  "]\\)+>+\\|[ \t]*[]>|}+]\\)+"))))
589    "*Regexp matching the longest possible citation prefix on a line."    "*Regexp matching the longest possible citation prefix on a line."
590      :version "21.4"
591    :group 'message-insertion    :group 'message-insertion
592    :link '(custom-manual "(message)Insertion Variables")    :link '(custom-manual "(message)Insertion Variables")
593    :type 'regexp)    :type 'regexp)
# Line 743  Doing so would be even more evil than le Line 744  Doing so would be even more evil than le
744    "*Envelope-from when sending mail with sendmail.    "*Envelope-from when sending mail with sendmail.
745  If this is nil, use `user-mail-address'.  If it is the symbol  If this is nil, use `user-mail-address'.  If it is the symbol
746  `header', use the From: header of the message."  `header', use the From: header of the message."
747      :version "21.4"
748    :type '(choice (string :tag "From name")    :type '(choice (string :tag "From name")
749                   (const :tag "Use From: header from message" header)                   (const :tag "Use From: header from message" header)
750                   (const :tag "Use `user-mail-address'" nil))                   (const :tag "Use `user-mail-address'" nil))
# Line 855  the signature is inserted." Line 857  the signature is inserted."
857    (let ((map (make-sparse-keymap 'message-minibuffer-local-map)))    (let ((map (make-sparse-keymap 'message-minibuffer-local-map)))
858      (set-keymap-parent map minibuffer-local-map)      (set-keymap-parent map minibuffer-local-map)
859      map)      map)
860    "Keymap for `message-read-from-minibuffer'.")    "Keymap for `message-read-from-minibuffer'."
861      :version "21.4")
862    
863  ;;;###autoload  ;;;###autoload
864  (defcustom message-citation-line-function 'message-insert-citation-line  (defcustom message-citation-line-function 'message-insert-citation-line
# Line 1435  no, only reply back to the author." Line 1438  no, only reply back to the author."
1438    
1439  (defcustom message-user-fqdn nil  (defcustom message-user-fqdn nil
1440    "*Domain part of Messsage-Ids."    "*Domain part of Messsage-Ids."
1441      :version "21.4"
1442    :group 'message-headers    :group 'message-headers
1443    :link '(custom-manual "(message)News Headers")    :link '(custom-manual "(message)News Headers")
1444    :type '(radio (const :format "%v  " nil)    :type '(radio (const :format "%v  " nil)
# Line 6590  which specify the range to operate on." Line 6594  which specify the range to operate on."
6594          '("^\\(Disposition-Notification-To\\|Return-Receipt-To\\):"          '("^\\(Disposition-Notification-To\\|Return-Receipt-To\\):"
6595            . message-expand-name))            . message-expand-name))
6596    "Alist of (RE . FUN).  Use FUN for completion on header lines matching RE."    "Alist of (RE . FUN).  Use FUN for completion on header lines matching RE."
6597      :version "21.4"
6598    :group 'message    :group 'message
6599    :type '(alist :key-type regexp :value-type function))    :type '(alist :key-type regexp :value-type function))
6600    

Legend:
Removed from v.1.55.4.6  
changed lines
  Added in v.1.55.4.7

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26