From 8ac8cb144aacbb4a150490f86971da3a481f03e2 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sat, 6 Sep 2008 18:44:36 +0000 Subject: [PATCH] (pmail-sort-messages): Use pmail-desc-get-start, pmail-desc-get-end rather than non-existent `marker-' functions. --- lisp/mail/pmailsort.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) 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)) -- 2.39.5