# HG changeset patch # User Stefan Monnier # Date 1124884147 0 # Node ID 1aae62fd4a809bd9b5781d826732be283052f91d # Parent a54c7c22bb33eb5e930ba9ac474ac27ba5b604c6 (custom-theme-set-variables): Sort minor modes last. diff -r a54c7c22bb33 -r 1aae62fd4a80 lisp/custom.el --- a/lisp/custom.el Wed Aug 24 11:36:35 2005 +0000 +++ b/lisp/custom.el Wed Aug 24 11:49:07 2005 +0000 @@ -726,15 +726,13 @@ (error "Circular custom dependency between `%s' and `%s'" sym1 sym2)) (2-then-1 nil) - ;; Put symbols with :require last. The macro - ;; define-minor-mode generates a defcustom - ;; with a :require and a :set, where the - ;; setter function calls the mode function. - ;; Putting symbols with :require last ensures - ;; that the mode function will see other - ;; customized values rather than default - ;; values. - (t (nth 3 a2))))))) + ;; Put minor modes and symbols with :require last. + ;; Putting minor modes last ensures that the mode + ;; function will see other customized values rather + ;; than default values. + (t (or (nth 3 a2) + (eq (get sym2 'custom-set) + 'custom-set-minor-mode)))))))) (while args (let ((entry (car args))) (if (listp entry)