Commit 0b97da8f authored by Richard M. Stallman's avatar Richard M. Stallman

(customize-unsaved): Renamed from customize-customized.

Change messages accordingly.
(customize-customized): Now alias.
parent e6a24f43
......@@ -1320,9 +1320,11 @@ suggest to customize that face, if it's customizable."
(format "*Customize Face: %s*"
(custom-unlispify-tag-name face)))))
(defalias 'customize-customized 'customize-unsaved)
;;;###autoload
(defun customize-customized ()
"Customize all user options set since the last save in this session."
(defun customize-unsaved ()
"Customize all user options set in this session but not saved."
(interactive)
(let ((found nil))
(mapatoms (lambda (symbol)
......@@ -1335,9 +1337,9 @@ suggest to customize that face, if it's customizable."
(boundp symbol)
(push (list symbol 'custom-variable) found))))
(if (not found)
(error "No customized user options")
(error "No user options are set but unsaved")
(custom-buffer-create (custom-sort-items found t nil)
"*Customize Customized*"))))
"*Customize Unsaved*"))))
;;;###autoload
(defun customize-rogue ()
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment