From: John Paul Wallington <jpw@pobox.com>
Date: Wed, 12 Jan 2005 22:49:19 +0000 (+0000)
Subject: (custom-declare-variable): Just put symbol instead of (defvar . symbol)
X-Git-Tag: ttn-vms-21-2-B4~2788
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=808882608af70b6993de814cba46ee23f74bcaca;p=emacs.git

(custom-declare-variable): Just put symbol instead of (defvar . symbol)
on `current-load-list'.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9a8a56f2e64..c1840d8ead7 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-01-12  Johan Bockg,Ae(Brd  <bojohan@users.sourceforge.net>
+
+	* custom.el (custom-declare-variable): Just put symbol instead
+	of (defvar . symbol) on `current-load-list'.
+
 2005-01-12  Reiner Steib  <Reiner.Steib@gmx.de>
 
 	* emacs-lisp/elint.el: Fixed typo in Commentary section.
diff --git a/lisp/custom.el b/lisp/custom.el
index 5fea8c5d12d..e7aba88f72a 100644
--- a/lisp/custom.el
+++ b/lisp/custom.el
@@ -168,7 +168,7 @@ set to nil, as the value is no longer rogue."
     ;; Do the actual initialization.
     (unless custom-dont-initialize
       (funcall initialize symbol default)))
-  (push (cons 'defvar symbol) current-load-list)
+  (push symbol current-load-list)
   (run-hooks 'custom-define-hook)
   symbol)