Function: Rmail-msg-hdrs-full

Rmail-msg-hdrs-full is a byte-compiled function defined in hrmail.el.

Signature

(Rmail-msg-hdrs-full TOGGLED)

Documentation

If TOGGLED is non-nil, toggle full/hidden headers, else show full headers.

Source Code

;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/hrmail.el
(defun Rmail-msg-hdrs-full (toggled)
  "If TOGGLED is non-nil, toggle full/hidden headers, else show full headers."
  (save-excursion
    (if (or toggled
	    (let ((tog nil))
	      (save-excursion
		(save-restriction
		  (rmail-maybe-set-message-counters)
		  (narrow-to-region (rmail-msgbeg rmail-current-message)
				    (point-max))
		  (let ((buffer-read-only nil))
		    (goto-char (point-min))
		    (forward-line 1)
		    ;; Need to show full header
		    (if (eq (following-char) ?1)
			(setq tog t)))))
	      tog))
	(progn (rmail-toggle-header)
	       (setq toggled t)))
    toggled))