Mercurial > emacs
diff lisp/custom.el @ 36902:06affc73c4ea
(custom-set-variables): Avoid reversing the list
needlessly.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Tue, 20 Mar 2001 16:36:59 +0000 |
parents | 9a470a7db563 |
children | 253f761ad37b |
line wrap: on
line diff
--- a/lisp/custom.el Tue Mar 20 15:47:08 2001 +0000 +++ b/lisp/custom.el Tue Mar 20 16:36:59 2001 +0000 @@ -1,6 +1,6 @@ ;;; custom.el -- Tools for declaring and initializing options. ;; -;; Copyright (C) 1996, 1997, 1999 Free Software Foundation, Inc. +;; Copyright (C) 1996, 1997, 1999, 2001 Free Software Foundation, Inc. ;; ;; Author: Per Abrahamsen <abraham@dina.kvl.dk> ;; Maintainer: FSF @@ -438,8 +438,8 @@ (cond ((and 1-then-2 2-then-1) (error "Circular custom dependency between `%s' and `%s'" sym1 sym2)) - (2-then-1 nil) - (t t)))))) + (1-then-2 t) + (t nil)))))) (while args (let ((entry (car args))) (if (listp entry)