/[emacs]/emacs/lisp/custom.el
ViewVC logotype

Diff of /emacs/lisp/custom.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.92 by lektu, Mon Jul 11 06:09:37 2005 UTC revision 1.93 by teirllm, Mon Jul 11 23:41:11 2005 UTC
# Line 680  COMMENT is a comment string about SYMBOL Line 680  COMMENT is a comment string about SYMBOL
680    (apply 'custom-theme-set-variables 'user args))    (apply 'custom-theme-set-variables 'user args))
681    
682  (defun custom-reevaluate-setting (symbol)  (defun custom-reevaluate-setting (symbol)
683    "Reset the value of SYMBOL by re-evaluating its saved or default value.    "Reset the value of SYMBOL by re-evaluating its saved or standard value.
684  This is useful for variables that are defined before their default value  Use the :set function to do so.  This is useful for customizable options
685  can really be computed.  E.g. dumped variables whose default depends on  that are defined before their standard value can really be computed.
686  run-time information."  E.g. dumped variables whose default depends on run-time information."
687    (funcall (or (get symbol 'custom-set) 'set-default)    (funcall (or (get symbol 'custom-set) 'set-default)
688             symbol             symbol
689             (eval (car (or (get symbol 'saved-value) (get symbol 'standard-value))))))             (eval (car (or (get symbol 'saved-value) (get symbol 'standard-value))))))

Legend:
Removed from v.1.92  
changed lines
  Added in v.1.93

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26