Mercurial > hg > xemacs-beta

comparison lisp/cus-edit.el @ 782:616e133a0ce6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2002-03-18 22:22:15 by adrian] [ACR21.4] [PATCH] xemacs-21.5: Fix typo in prompt for customize-save-variable <vgbtblbl.fsf@mailto.t-online.de>
author adrian
date Mon, 18 Mar 2002 22:22:15 +0000
parents 79940b592197
children 0cb55b2a2c66
comparison
equal deleted inserted replaced
781:eba92770173a 782:616e133a0ce6
748 748
749 If VARIABLE has a `custom-type' property, it must be a widget and the 749 If VARIABLE has a `custom-type' property, it must be a widget and the
750 `:prompt-value' property of that widget will be used for reading the value. 750 `:prompt-value' property of that widget will be used for reading the value.
751 751
752 If given a prefix (or a COMMENT argument), also prompt for a comment." 752 If given a prefix (or a COMMENT argument), also prompt for a comment."
753 (interactive (custom-prompt-variable "Set and ave variable: " 753 (interactive (custom-prompt-variable "Set and save variable: "
754 "Set and save value for %s as: " 754 "Set and save value for %s as: "
755 current-prefix-arg)) 755 current-prefix-arg))
756 (funcall (or (get variable 'custom-set) 'set-default) variable value) 756 (funcall (or (get variable 'custom-set) 'set-default) variable value)
757 (put variable 'saved-value (list (custom-quote value))) 757 (put variable 'saved-value (list (custom-quote value)))
758 (custom-push-theme 'theme-value variable 'user 'set (list (custom-quote value))) 758 (custom-push-theme 'theme-value variable 'user 'set (list (custom-quote value)))