changeset 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 0c5978b5eb3a
children d12b4a1326c1
files lisp/custom.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
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)