diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2009-09-19 19:43:37 +0000 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2009-09-19 19:43:37 +0000 |
commit | 327dd27aa7b049c7bfec2b50cff10ab113ceb330 (patch) | |
tree | f8d0def5e7f740825a225a8e430eb5d3d4b1b357 /lisp/time-stamp.el | |
parent | 946c009b511d6b459abafb8d2201bb7f526933be (diff) | |
download | emacs-327dd27aa7b049c7bfec2b50cff10ab113ceb330.tar.gz |
* time-stamp.el (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): Remove
functions that have been obsolete since 1995 (Bug#4436).
Diffstat (limited to 'lisp/time-stamp.el')
-rw-r--r-- | lisp/time-stamp.el | 67 |
1 files changed, 0 insertions, 67 deletions
diff --git a/lisp/time-stamp.el b/lisp/time-stamp.el index 7e4a3df8750..d2adad1e82f 100644 --- a/lisp/time-stamp.el +++ b/lisp/time-stamp.el @@ -705,73 +705,6 @@ around literals." (setq list (cdr list))) return-string)) -;;; Some functions used in time-stamp-format - -;;; These functions have been obsolete since 1995 -;;; and will be removed in Emacs 23. -;;; Meanwhile, discourage other packages from using them. -(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 - -(defun time-stamp-month-dd-yyyy () - "Return the current date as a string in \"Month DD, YYYY\" form." - (format-time-string "%B %e, %Y")) - -(defun time-stamp-dd/mm/yyyy () - "Return the current date as a string in \"DD/MM/YYYY\" form." - (format-time-string "%d/%m/%Y")) - -;;; same as __DATE__ in ANSI C - -(defun time-stamp-mon-dd-yyyy () - "Return the current date as a string in \"Mon DD YYYY\" form. -The first character of DD is space if the value is less than 10." - (format-time-string "%b %d %Y")) - -;;; RFC 822 date - -(defun time-stamp-dd-mon-yy () - "Return the current date as a string in \"DD Mon YY\" form." - (format-time-string "%d %b %y")) - -;;; RCS 3 date - -(defun time-stamp-yy/mm/dd () - "Return the current date as a string in \"YY/MM/DD\" form." - (format-time-string "%y/%m/%d")) - -;;; RCS 5 date - -(defun time-stamp-yyyy/mm/dd () - "Return the current date as a string in \"YYYY/MM/DD\" form." - (format-time-string "%Y/%m/%d")) - -;;; ISO 8601 date - -(defun time-stamp-yyyy-mm-dd () - "Return the current date as a string in \"YYYY-MM-DD\" form." - (format-time-string "%Y-%m-%d")) - -(defun time-stamp-yymmdd () - "Return the current date as a string in \"YYMMDD\" form." - (format-time-string "%y%m%d")) - -(defun time-stamp-hh:mm:ss () - "Return the current time as a string in \"HH:MM:SS\" form." - (format-time-string "%T")) - -(defun time-stamp-hhmm () - "Return the current time as a string in \"HHMM\" form." - (format-time-string "%H%M")) - (provide 'time-stamp) ;; arch-tag: 8a12c5c3-25d6-4a71-adc5-24b0e025a1e7 |