# HG changeset patch # User Richard M. Stallman # Date 1167771354 0 # Node ID b644db4759fa5d700fdfda84e862e9cfa546173d # Parent a1cc89e6be8b971056e7380a6686e5e6c8a162d6 (customize-unsaved): Renamed from customize-customized. Change messages accordingly. (customize-customized): Now alias. diff -r a1cc89e6be8b -r b644db4759fa lisp/cus-edit.el --- a/lisp/cus-edit.el Tue Jan 02 20:54:10 2007 +0000 +++ b/lisp/cus-edit.el Tue Jan 02 20:55:54 2007 +0000 @@ -1320,9 +1320,11 @@ (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 @@ (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 ()