Lines Matching +defs:Custom +defs:save
35 ;; that the user will run with M-x, and `Custom-' for interactive commands.
90 ;; You can see (and modify and save) this unevaluated value by selecting
125 ;; standard interactive Custom commands do not let you create a
126 ;; Custom buffer containing such variables. However, such Custom
445 (defgroup auto-save nil
469 ;;; Custom mode keymaps
477 (define-key map [remap self-insert-command] 'Custom-no-edit)
478 (define-key map "\^m" 'Custom-newline)
481 (define-key map "\C-c\C-c" 'Custom-set)
482 (define-key map "\C-x\C-s" 'Custom-save)
483 (define-key map "q" 'Custom-buffer-done)
484 (define-key map "u" 'Custom-goto-parent)
574 (with-current-buffer (get-buffer-create " *Custom-Work*")
704 "If non-nil, sort each customization group alphabetically in Custom buffer."
761 ;;; Custom Mode Commands.
766 (defun Custom-set ()
780 (defun Custom-save ()
781 "Set all edited settings, then save all settings that have been set.
794 (widget-apply child :custom-save)))
796 (custom-save-all))
800 '(("Undo Edits" . Custom-reset-current)
801 ("Reset to Saved" . Custom-reset-saved)
802 ("Erase Customization (use standard values)" . Custom-reset-standard))
817 (defun Custom-reset-current (&rest ignore)
832 (defun Custom-reset-saved (&rest ignore)
848 (defun Custom-reset-standard (&rest ignore)
964 (defun customize-save-variable (variable value &optional comment)
965 "Set the default for VARIABLE to VALUE, and save it for future sessions.
978 (interactive (custom-prompt-variable "Set and save variable: "
979 "Set and save value for %s as: "
992 (custom-save-all)
1444 "*Non-nil means exiting a Custom buffer should kill it."
1515 (defun Custom-buffer-done (&rest ignore)
1516 "Exit current Custom buffer according to `custom-buffer-done-kill'."
1562 Use the setting's State button to set it or save changes in it.
1566 Emacs init file, you cannot save settings into the Emacs init file."))
1569 :tag "Custom file"
1572 " for information on how to save in a different file.\n
1587 (Custom-set)))
1603 (Custom-save))))
1618 :action 'Custom-reset-current)
1624 :action 'Custom-reset-saved)
1630 Un-customize all settings in this buffer and save them with standard values."
1631 :action 'Custom-reset-standard)))
1640 :action #'Custom-buffer-done)
1907 EDITED, shown value does not take effect until you set or save it." "\
2206 (save-excursion
2469 "Return documentation of VARIABLE for use in Custom buffer.
2478 This variable automatically becomes buffer-local when set outside Custom.
2479 However, setting it through Custom sets the default value.")
2494 :custom-save 'custom-variable-save
2657 ;; Don't push it !!! Custom assumes that the first child is the
2747 '(("Save for Future Sessions" custom-variable-save
2858 (defun custom-variable-save (widget)
2859 "Set and save the value for the variable being edited by WIDGET."
2898 (custom-save-all)
2944 (custom-save-all))
3052 (save-excursion
3065 (save-excursion
3208 :custom-save 'custom-face-save
3419 '(("Save for Future Sessions" custom-face-save)))
3544 (defun custom-face-save (widget)
3567 (custom-save-all)
3572 (define-obsolete-function-alias 'custom-face-save-command 'custom-face-save
3616 (custom-save-all))
3770 :custom-save 'custom-group-save
4028 '(("Save for Future Sessions" custom-group-save
4071 (defun custom-group-save (widget)
4076 (widget-apply child :custom-save)))
4133 You can set this option through Custom, if you carefully read the
4140 Note that both lines are necessary: the first line tells Custom to
4141 save all customizations in this file, but does not load it.
4143 When you change this variable outside Custom, look in the
4149 If you save this option using Custom, Custom will write all
4163 this through Custom.
4180 ;; Custom settings hasn't been read. Saving
4187 (defun custom-save-all ()
4190 (error "Cannot save customizations; init file was not fully loaded"))
4205 (custom-save-variables)
4206 (custom-save-faces))
4208 (save-buffer))
4213 (defun customize-save-customized ()
4237 (custom-save-all))
4242 (defun custom-save-delete (symbol)
4247 This function does not save the buffer."
4252 (save-excursion (forward-sexp (buffer-size)))) ; Test for scan errors.
4269 ;; Move in front of local variables, otherwise long Custom
4273 (save-excursion
4281 (defun custom-save-variables ()
4283 (save-excursion
4284 (custom-save-delete 'custom-set-variables)
4300 ;; custom-set-variables was added by Custom.
4355 (defun custom-save-faces ()
4357 (save-excursion
4358 (custom-save-delete 'custom-reset-faces)
4359 (custom-save-delete 'custom-set-faces)
4376 ;; custom-set-faces was added by Custom.
4494 ;;; The Custom Mode.
4496 (defun Custom-no-edit (pos &optional event)
4497 "Invoke button at POS, or refuse to allow editing of Custom buffer."
4499 (error "You can't edit this part of the Custom buffer"))
4501 (defun Custom-newline (pos &optional event)
4502 "Invoke button at POS, or refuse to allow editing of Custom buffer."
4507 (error "You can't edit this part of the Custom buffer"))))
4509 (easy-menu-define Custom-mode-menu
4512 `("Custom"
4514 ["Set" Custom-set t]
4515 ["Save" Custom-save t]
4516 ["Undo Edits" Custom-reset-current t]
4517 ["Reset to Saved" Custom-reset-saved t]
4518 ["Erase Customization" Custom-reset-standard t]
4523 (define-key map "\C-c\C-c" 'Custom-set)
4524 (define-key map "\C-x\C-s" 'Custom-save)
4530 (defun Custom-goto-parent ()
4534 (save-excursion
4542 "Hook called when entering Custom mode."
4563 Set all options from current text. \\[Custom-set]
4564 Make values in current text permanent. \\[Custom-save]
4565 Make text match actual option values. \\[Custom-reset-current]
4566 Reset options to permanent settings. \\[Custom-reset-saved]
4568 and buffer text to the standard values. \\[Custom-reset-standard]
4574 mode-name "Custom")
4576 (easy-menu-add Custom-mode-menu)