From: Glenn Morris Date: Sat, 6 Sep 2008 18:44:36 +0000 (+0000) Subject: (pmail-sort-messages): Use pmail-desc-get-start, pmail-desc-get-end X-Git-Tag: emacs-pretest-23.0.90~2993 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8ac8cb144aacbb4a150490f86971da3a481f03e2;p=emacs.git (pmail-sort-messages): Use pmail-desc-get-start, pmail-desc-get-end rather than non-existent `marker-' functions. --- diff --git a/lisp/mail/pmailsort.el b/lisp/mail/pmailsort.el index b874a0aedb0..bded0efde4f 100644 --- a/lisp/mail/pmailsort.el +++ b/lisp/mail/pmailsort.el @@ -33,8 +33,6 @@ (autoload 'timezone-make-date-sortable "timezone") -;(declare-function pmail-desc-get-marker-end "pmailsort" (msgnum)) -;(declare-function pmail-desc-get-marker-start "pmailsort" (msgnum)) (declare-function pmail-update-summary "pmailsum" (&rest ignore)) ;; Sorting messages in Pmail buffer @@ -176,8 +174,8 @@ If 1st argument REVERSE is non-nil, sort them in reverse order. (setq sort-lists (cons (list (funcall keyfun msgnum) ;Make sorting key (eq pmail-current-message msgnum) ;True if current - (pmail-desc-get-marker-start msgnum) - (pmail-desc-get-marker-end msgnum)) + (pmail-desc-get-start msgnum) + (pmail-desc-get-end msgnum)) sort-lists)) (if (zerop (% msgnum 10)) (message "Finding sort keys...%d" msgnum))