diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-12-23 03:43:13 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-12-23 03:43:13 +0000 |
| commit | fb7af02718ee290bf31c0f59e6db93a69fe865e2 (patch) | |
| tree | 0f139c8ad23bbf2a039dc308eae801ed969732d4 /lisp/time-stamp.el | |
| parent | b6b13324bb5fe0cbbff6781f60d74cb46d6bd70c (diff) | |
| download | emacs-fb7af02718ee290bf31c0f59e6db93a69fe865e2.tar.gz | |
(time-stamp-month-dd-yyyy): no leading zero on day.
Diffstat (limited to 'lisp/time-stamp.el')
| -rw-r--r-- | lisp/time-stamp.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/time-stamp.el b/lisp/time-stamp.el index 744b3ea4910..af529c93cee 100644 --- a/lisp/time-stamp.el +++ b/lisp/time-stamp.el @@ -2,7 +2,7 @@ ;;; Copyright 1989, 1993 Free Software Foundation, Inc. ;; Maintainer: Stephen Gildea <gildea@lcs.mit.edu> -;; Time-stamp: <93/09/24 16:02:25 gildea> +;; Time-stamp: <93/12/07 07:38:54 gildea> ;; Keywords: tools ;; This file is free software; you can redistribute it and/or modify @@ -184,7 +184,7 @@ otherwise the value of the function system-name." (defun time-stamp-month-dd-yyyy () "Return the current date as a string in \"Month dd, yyyy\" form." (let ((date (current-time-string))) - (format "%s %02d, %s" + (format "%s %d, %s" (aref time-stamp-month-full-names (cdr (assoc (substring date 4 7) time-stamp-month-numbers))) (string-to-int (substring date 8 10)) @@ -273,4 +273,3 @@ The first character of dd is Space if the value is less than 10." ;;; time-stamp.el ends here - |