aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/calendar
diff options
context:
space:
mode:
authorPaul Eggert2018-09-13 17:31:58 -0700
committerPaul Eggert2018-09-13 17:32:33 -0700
commitda4e5f668582e1f047b6bd5259a1a4f92b5461b6 (patch)
tree7667273c2d62df723916ec00f02c73613ff290df /lisp/calendar
parentc44bc4d370b38ac3e9da15579fd372d1410d4b4c (diff)
downloademacs-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.el4
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"