procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(custom-make-dependencies): Fix previous change.

Browse source
This commit is contained in:
Richard M. Stallman 2002-09-20 03:44:38 +00:00
parent 4986d1f19b
commit 2912113bbd
1 changed files with 1 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/cus-dep.el
View file

@ -89,15 +89,7 @@ Usage: emacs -batch -l ./cus-dep.el -f custom-make-dependencies DIRS"
;; 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)