Function: message-sort-headers-1
message-sort-headers-1 is a byte-compiled function defined in
message.el.gz.
Signature
(message-sort-headers-1)
Documentation
Sort the buffer as headers using message-rank text props.
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/message.el.gz
(defun message-sort-headers-1 ()
"Sort the buffer as headers using `message-rank' text props."
(goto-char (point-min))
(require 'sort)
(sort-subr
nil 'message-next-header
(lambda ()
(message-next-header)
(unless (bobp)
(forward-char -1)))
(lambda ()
(or (get-text-property (point) 'message-rank)
10000))))