I forgot that the argument to defcustom gets evaluated outside the
       :initialize function.  I will implement another solution.

I don't think so.  Here's the body of `defcustom':

  (nconc (list 'custom-declare-variable
               (list 'quote symbol)
               (list 'quote value)
               doc)
         args))

And here's what custom-initialize-set does:

  (unless (default-boundp symbol)
    (funcall (or (get symbol 'custom-set) 'set-default)
             symbol
             (if (get symbol 'saved-value)
                 (eval (car (get symbol 'saved-value)))
               (eval value)))))


I think your code was right, so please reinstall it.


What led you to think this was wrong?


_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel

Reply via email to