diff options
| author | Paul Eggert | 2018-09-13 17:31:58 -0700 |
|---|---|---|
| committer | Paul Eggert | 2018-09-13 17:32:33 -0700 |
| commit | da4e5f668582e1f047b6bd5259a1a4f92b5461b6 (patch) | |
| tree | 7667273c2d62df723916ec00f02c73613ff290df /lisp/calendar | |
| parent | c44bc4d370b38ac3e9da15579fd372d1410d4b4c (diff) | |
| download | emacs-da4e5f668582e1f047b6bd5259a1a4f92b5461b6.tar.gz emacs-da4e5f668582e1f047b6bd5259a1a4f92b5461b6.zip | |
Simplify use of timestamps
* lisp/calendar/icalendar.el (icalendar--create-uid):
* lisp/gnus/nnmaildir.el (nnmaildir-request-accept-article):
Simplify by using format-time-string.
* lisp/gnus/nnmaildir.el (nnmaildir--scan):
Simplify by using float-time and time-less-p.
Diffstat (limited to 'lisp/calendar')
| -rw-r--r-- | lisp/calendar/icalendar.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/calendar/icalendar.el b/lisp/calendar/icalendar.el index c1a3e0a4213..e3e458a4dd7 100644 --- a/lisp/calendar/icalendar.el +++ b/lisp/calendar/icalendar.el | |||
| @@ -1016,9 +1016,7 @@ current iCalendar object, as a string. Increase | |||
| 1016 | (setq icalendar--uid-count (1+ icalendar--uid-count)) | 1016 | (setq icalendar--uid-count (1+ icalendar--uid-count)) |
| 1017 | (setq uid (replace-regexp-in-string | 1017 | (setq uid (replace-regexp-in-string |
| 1018 | "%t" | 1018 | "%t" |
| 1019 | (format "%d%d%d" (car (current-time)) | 1019 | (format-time-string "%s%N") |
| 1020 | (cadr (current-time)) | ||
| 1021 | (car (cddr (current-time)))) | ||
| 1022 | uid t t)) | 1020 | uid t t)) |
| 1023 | (setq uid (replace-regexp-in-string | 1021 | (setq uid (replace-regexp-in-string |
| 1024 | "%h" | 1022 | "%h" |