comparison lisp/gnus/message.el @ 33982:ff339ba39162

(message-header-lines): Fontify tag.
author Miles Bader <miles@gnu.org>
date Wed, 29 Nov 2000 08:18:27 +0000
parents 8d6dc71efabb
children 98bd49d8cf7d
comparison
equal deleted inserted replaced
33981:8f391722dfba 33982:ff339ba39162
575 (defvar message-postpone-actions nil 575 (defvar message-postpone-actions nil
576 "A list of actions to be performed after postponing a message.") 576 "A list of actions to be performed after postponing a message.")
577 577
578 (define-widget 'message-header-lines 'text 578 (define-widget 'message-header-lines 'text
579 "All header lines must be LFD terminated." 579 "All header lines must be LFD terminated."
580 :format "%t:%n%v" 580 :format "%{%t%}:%n%v"
581 :valid-regexp "^\\'" 581 :valid-regexp "^\\'"
582 :error "All header lines must be newline terminated") 582 :error "All header lines must be newline terminated")
583 583
584 (defcustom message-default-headers "" 584 (defcustom message-default-headers ""
585 "*A string containing header lines to be inserted in outgoing messages. 585 "*A string containing header lines to be inserted in outgoing messages.