diff options
| -rw-r--r-- | lisp/mail/pmailsort.el | 6 |
1 files 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 @@ | |||
| 33 | 33 | ||
| 34 | (autoload 'timezone-make-date-sortable "timezone") | 34 | (autoload 'timezone-make-date-sortable "timezone") |
| 35 | 35 | ||
| 36 | ;(declare-function pmail-desc-get-marker-end "pmailsort" (msgnum)) | ||
| 37 | ;(declare-function pmail-desc-get-marker-start "pmailsort" (msgnum)) | ||
| 38 | (declare-function pmail-update-summary "pmailsum" (&rest ignore)) | 36 | (declare-function pmail-update-summary "pmailsum" (&rest ignore)) |
| 39 | 37 | ||
| 40 | ;; Sorting messages in Pmail buffer | 38 | ;; Sorting messages in Pmail buffer |
| @@ -176,8 +174,8 @@ If 1st argument REVERSE is non-nil, sort them in reverse order. | |||
| 176 | (setq sort-lists | 174 | (setq sort-lists |
| 177 | (cons (list (funcall keyfun msgnum) ;Make sorting key | 175 | (cons (list (funcall keyfun msgnum) ;Make sorting key |
| 178 | (eq pmail-current-message msgnum) ;True if current | 176 | (eq pmail-current-message msgnum) ;True if current |
| 179 | (pmail-desc-get-marker-start msgnum) | 177 | (pmail-desc-get-start msgnum) |
| 180 | (pmail-desc-get-marker-end msgnum)) | 178 | (pmail-desc-get-end msgnum)) |
| 181 | sort-lists)) | 179 | sort-lists)) |
| 182 | (if (zerop (% msgnum 10)) | 180 | (if (zerop (% msgnum 10)) |
| 183 | (message "Finding sort keys...%d" msgnum)) | 181 | (message "Finding sort keys...%d" msgnum)) |