*** empty log message ***

[gnus] / lisp / gnus-util.el

diff --git a/lisp/gnus-util.el b/lisp/gnus-util.el
index cbcc56d..2ed2c34 100644 (file)
--- a/lisp/gnus-util.el
+++ b/lisp/gnus-util.el
@@ -328,7 +328,7 @@
     (message "")))
 
 ;; I suspect there's a better way, but I haven't taken the time to do
-;; it yet. -erik selberg@cs.washington.edu
+;; it yet.  -erik selberg@cs.washington.edu
 (defun gnus-dd-mmm (messy-date)
   "Return a string like DD-MMM from a big messy string"
   (let ((datevec (condition-case () (timezone-parse-date messy-date) 
@@ -520,7 +520,7 @@ Timezone package is used."
    ((null funs) funs)
    ((cdr funs)
     `(lambda (t1 t2)
-       ,(gnus-make-sort-function-1 (nreverse funs))))
+       ,(gnus-make-sort-function-1 (reverse funs))))
    (t
     (car funs))))