From: Gerd Moellmann <gerd@gnu.org>
Date: Tue, 20 Mar 2001 16:36:59 +0000 (+0000)
Subject: (custom-set-variables): Avoid reversing the list
X-Git-Tag: emacs-pretest-21.0.101~235
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=748be1ad5ed81a860b335716e9c931153f4c299b;p=emacs.git

(custom-set-variables): Avoid reversing the list
needlessly.
---

diff --git a/lisp/custom.el b/lisp/custom.el
index 392305af153..f8ffaeac1a1 100644
--- a/lisp/custom.el
+++ b/lisp/custom.el
@@ -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 @@ COMMENT is a comment string about SYMBOL."
 		  (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)