Mercurial > emacs

diff lisp/gnus/gnus-range.el @ 110111:5b9f64b04a04

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Delete all trailing white space.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Thu, 02 Sep 2010 01:42:32 +0000
parents 8d09094063d0
children f2e111723c3a
line wrap: on
line diff
--- a/lisp/gnus/gnus-range.el	Thu Sep 02 01:33:31 2010 +0000
+++ b/lisp/gnus/gnus-range.el	Thu Sep 02 01:42:32 2010 +0000
@@ -187,7 +187,7 @@
 RANGE1 and RANGE2 have to be sorted over <."
   (let* (out
          (min1 (car range1))
-         (max1 (if (numberp min1) 
+         (max1 (if (numberp min1)
                    (if (numberp (cdr range1))
                        (prog1 (cdr range1)
                          (setq range1 nil)) min1)
@@ -196,8 +196,8 @@
          (min2 (car range2))
          (max2 (if (numberp min2)
                    (if (numberp (cdr range2))
-                       (prog1 (cdr range2) 
-                         (setq range2 nil)) min2) 
+                       (prog1 (cdr range2)
+                         (setq range2 nil)) min2)
                  (prog1 (cdr min2)
                    (setq min2 (car min2))))))
     (setq range1 (cdr range1)