From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 2 Jan 2007 20:55:54 +0000 (+0000)
Subject: (customize-unsaved): Renamed from customize-customized.
X-Git-Tag: emacs-pretest-22.0.93~290
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0b97da8f381b028fd49b2d056325e581c9d810e1;p=emacs.git

(customize-unsaved): Renamed from customize-customized.
Change messages accordingly.
(customize-customized): Now alias.
---

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 59026942281..27ce163157b 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -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 ()