Re: Bug in latest CVS.

[Richard Stallman]

Does this fix it?

*** cus-dep.el.~1.18.~  Tue Sep 17 09:47:57 2002
--- cus-dep.el  Thu Sep 19 14:49:30 2002
***************
*** 87,93 ****
                    item where found)
                (when members
                  ;; So x and no-x builds won't differ.
!                 (setq members (sort (copy-sequence members) 'string<))
                  (while members
                    (setq item (car (car members))
                          members (cdr members)
--- 87,103 ----
                    item where found)
                (when members
                  ;; 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)))))))
                  (while members
                    (setq item (car (car members))
                          members (cdr members)