diff lisp/custom.el @ 217:d44af0c54775 r20-4b7

Import from CVS: tag r20-4b7
author cvs
date Mon, 13 Aug 2007 10:08:34 +0200
parents 41ff10fd062f
children 2c611d1463a6
line wrap: on
line diff
--- a/lisp/custom.el	Mon Aug 13 10:07:42 2007 +0200
+++ b/lisp/custom.el	Mon Aug 13 10:08:34 2007 +0200
@@ -145,6 +145,9 @@
     (put symbol 'custom-requests requests)
     ;; Do the actual initialization.
     (funcall initialize symbol value))
+  ;; #### This is a rough equivalent of LOADHIST_ATTACH.  However,
+  ;; LOADHIST_ATTACH also checks for `initialized'.
+  (push symbol current-load-list)
   (run-hooks 'custom-define-hook)
   symbol)