Function: message-insert-or-toggle-importance
message-insert-or-toggle-importance is an interactive and
byte-compiled function defined in message.el.gz.
Signature
(message-insert-or-toggle-importance)
Documentation
Insert a "Importance: high" header, or cycle through the header values.
The three allowed values according to RFC 1327 are high, normal
and low.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/message.el.gz
(defun message-insert-or-toggle-importance ()
"Insert a \"Importance: high\" header, or cycle through the header values.
The three allowed values according to RFC 1327 are `high', `normal'
and `low'."
(interactive nil message-mode)
(save-excursion
(let ((new "high")
cur)
(save-restriction
(message-narrow-to-headers)
(when (setq cur (message-fetch-field "Importance"))
(message-remove-header "Importance")
(setq new (cond ((string= cur "high")
"low")
((string= cur "low")
"normal")
(t
"high")))))
(message-goto-eoh)
(insert (format "Importance: %s\n" new)))))