Mercurial > emacs

changeset 47557:5a735e0d66d4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(custom-make-dependencies): Fix previous change.
author Richard M. Stallman <rms@gnu.org>
date Fri, 20 Sep 2002 03:44:38 +0000
parents 6ac4f3375d60
children 428571249b47
files lisp/cus-dep.el
diffstat 1 files changed, 1 insertions(+), 9 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/cus-dep.el	Thu Sep 19 18:57:55 2002 +0000
+++ b/lisp/cus-dep.el	Fri Sep 20 03:44:38 2002 +0000
@@ -89,15 +89,7 @@
 		  ;; So x and no-x builds won't differ.
 		  (setq members
 			(sort (copy-sequence members) 
-			      (lambda (x y)
-				(cond ((and (stringp x) (stringp y))
-				       (string< x y))
-				      ;; Put all non-strings before strings.
-				      ((stringp y) t)
-				      ((stringp x) nil)
-				      ;; For two non-strings,
-				      ;; use the order they appear in MEMBERS.
-				      (t (member y (member x members)))))))
+			      (lambda (x y) (string< (car x) (car y)))))
 		  (while members
 		    (setq item (car (car members))
 			  members (cdr members)