From: Juanma Barranquero <lekktu@gmail.com>
Date: Mon, 27 Nov 2006 14:35:47 +0000 (+0000)
Subject: Fix comment and obsolescence string for old functions.
X-Git-Tag: emacs-pretest-22.0.92~455
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8d4bf0e5374213dbb5bd8b808241afff8893f80d;p=emacs.git

Fix comment and obsolescence string for old functions.
Use `dolist' instead of `while'.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 07d8f74887f..caf22164133 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,36 @@
+2006-11-27  Juanma Barranquero  <lekktu@gmail.com>
+
+	* time-stamp.el: Fix comment and obsolescence string for old
+	functions.  Use `dolist' instead of `while'.
+
+	* disp-table.el (standard-display-8bit, standard-display-default):
+	* ebuff-menu.el (electric-buffer-list):
+	* ehelp.el (electric-help-command-loop):
+	* font-core.el (font-lock-mode):
+	* help-macro.el (make-help-screen):
+	* help.el (describe-minor-mode-completion-table-for-indicator)
+	(lookup-minor-mode-from-indicator):
+	* indent.el (tab-to-tab-stop, move-to-tab-stop):
+	* info-look.el (info-lookup-guess-custom-symbol):
+	* locate.el (locate-main-listing-line-p, locate-mode, locate-do-setup):
+	* longlines.el (longlines-wrap-line):
+	* macros.el (insert-kbd-macro):
+	* menu-bar.el (menu-bar-update-buffers):
+	* misc.el (copy-from-above-command):
+	* mouse.el (mouse-popup-menubar, mouse-buffer-menu-alist):
+	* newcomment.el (comment-indent):
+	* novice.el (disabled-command-function):
+	* sort.el (sort-fields-syntax-table):
+	* subr.el (momentary-string-display):
+	* tar-mode.el (tar-header-block-summarize)
+	(tar-clear-modification-flags):
+	* terminal.el (terminal-cease-edit, te-more-break-unwind, te-newline)
+	(te-clear-rest-of-line, te-clear-rest-of-screen, te-clear-screen)
+	(te-insert-lines, te-delete-lines, te-delete, te-insert-spaces)
+	(te-delete-char, te-down-vertically-or-scroll):
+	* time-stamp.el (time-stamp-string-preprocess):
+	* tmm.el (tmm-add-one-shortcut): "?\ " -> "?\s".
+
 2006-11-26  Nick Roberts  <nickrob@snap.net.nz>
 
 	* speedbar.el (speedbar-timer-fn): Revert to old behaviour when not
@@ -2755,7 +2788,7 @@
 
 	* dired.el (dired-log-summary): Add doc string.
 
-	* cus-edit.el (custom-menu-create): Bind deactivate-mark here
+	* cus-edit.el (custom-menu-create): Bind deactivate-mark here.
 	(custom-group-menu-create): Not here.
 
 2006-09-08  Carsten Dominik  <dominik@science.uva.nl>
@@ -7048,8 +7081,7 @@
 	(defcustom, defface, defgroup): Replace reference to Customization
 	chapter in manual with hyperlink.
 
-	* cus-edit.el (customize-package-emacs-version-alist):
-	New variable.
+	* cus-edit.el (customize-package-emacs-version-alist): New variable.
 	(customize-changed-options): Add check for custom-package-version.
 	(customize-package-emacs-version): New function to look up Emacs
 	version corresponding to the given package version.
diff --git a/lisp/time-stamp.el b/lisp/time-stamp.el
index daa713e069b..f29806e3013 100644
--- a/lisp/time-stamp.el
+++ b/lisp/time-stamp.el
@@ -710,23 +710,16 @@ around literals."
 ;;; Some functions used in time-stamp-format
 
 ;;; These functions have been obsolete since 1995
-;;; and will be removed in Emacs 22.
+;;; and will be removed in a future Emacs release.
 ;;; Meanwhile, discourage other packages from using them.
-(let ((obsolete-functions '(time-stamp-month-dd-yyyy
-			    time-stamp-dd/mm/yyyy
-			    time-stamp-mon-dd-yyyy
-			    time-stamp-dd-mon-yy
-			    time-stamp-yy/mm/dd
-			    time-stamp-yyyy/mm/dd
-			    time-stamp-yyyy-mm-dd
-			    time-stamp-yymmdd
-			    time-stamp-hh:mm:ss
-			    time-stamp-hhmm)))
-  (while obsolete-functions
-    (make-obsolete (car obsolete-functions)
-		   "use time-stamp-string or format-time-string instead."
-		   "20.1")
-    (setq obsolete-functions (cdr obsolete-functions))))
+(dolist (function '(time-stamp-month-dd-yyyy time-stamp-dd/mm/yyyy
+		    time-stamp-mon-dd-yyyy   time-stamp-dd-mon-yy
+		    time-stamp-yy/mm/dd      time-stamp-yyyy/mm/dd
+		    time-stamp-yyyy-mm-dd    time-stamp-yymmdd
+		    time-stamp-hh:mm:ss      time-stamp-hhmm))
+  (make-obsolete function
+		 "use `time-stamp-string' or `format-time-string' instead."
+		 "20.1"))
 
 ;;; pretty form, suitable for a title page