(custom-declare-variable): Just put symbol instead of (defvar . symbol)

on `current-load-list'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9a8a56f2e6481f9b624e339a6798a62f0d7a5986..c1840d8ead72fff33d3f6efe26e2749fea928fb5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-01-12  Johan Bockg\e,Ae\e(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 5fea8c5d12df01ee9f29205f9366b46599c2484f..e7aba88f72a0849d206fe1d4e86d31a8e7188bb5 100644 (file)
--- 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)