diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2006-11-27 14:35:47 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2006-11-27 14:35:47 +0000 |
| commit | 8d4bf0e5374213dbb5bd8b808241afff8893f80d (patch) | |
| tree | 230bf2d4872672bd2b0cb27f1be817f446576e75 /lisp/time-stamp.el | |
| parent | a322861f63b4f69134c5bcb1d2639e87055a5f15 (diff) | |
| download | emacs-8d4bf0e5374213dbb5bd8b808241afff8893f80d.tar.gz | |
Fix comment and obsolescence string for old functions.
Use `dolist' instead of `while'.
Diffstat (limited to 'lisp/time-stamp.el')
| -rw-r--r-- | lisp/time-stamp.el | 25 |
1 files changed, 9 insertions, 16 deletions
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 |