Mercurial > emacs

changeset 73266:acb35bee2828

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ido-file-extension-aux): Fix comparison.
author Kim F. Storm <storm@cua.dk>
date Fri, 06 Oct 2006 22:54:36 +0000
parents 0190a09474b5
children 7b7b6680e295
files lisp/ido.el
diffstat 1 files changed, 7 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ido.el	Fri Oct 06 22:54:18 2006 +0000
+++ b/lisp/ido.el	Fri Oct 06 22:54:36 2006 +0000
@@ -3084,12 +3084,14 @@
   (let ((oa (ido-file-extension-order a n))
 	(ob (ido-file-extension-order b n)))
     (cond
-     ((= oa ob)
-      lessp)
      ((and oa ob)
-      (if lessp
-	  (> oa ob)
-	(< oa ob)))
+      (cond
+       ((= oa ob)
+	lessp)
+       (lessp
+	(> oa ob))
+       (t
+	(< oa ob))))
      (oa
       (not lessp))
      (ob