summaryrefslogtreecommitdiff
path: root/lisp/epg.el
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2022-08-01 00:38:33 -0700
committerPaul Eggert <eggert@cs.ucla.edu>2022-08-01 01:17:16 -0700
commita51863f73d914dbabbadb396cda2c9d360866277 (patch)
tree16b2024853ac54e9aaa1a825de958d9501a1055c /lisp/epg.el
parentd634cb09547eb5ffba105b6c90410fd843bf029d (diff)
downloademacs-a51863f73d914dbabbadb396cda2c9d360866277.tar.gz
emacs-a51863f73d914dbabbadb396cda2c9d360866277.tar.bz2
emacs-a51863f73d914dbabbadb396cda2c9d360866277.zip
Simplify a few timestamps
* lisp/calendar/time-date.el (safe-date-to-time): * lisp/calendar/timeclock.el (timeclock-generate-report): * lisp/epg.el (epg--start): * lisp/gnus/gnus-demon.el (gnus-demon-nntp-close-connection): * lisp/gnus/gnus-util.el (gnus-date-get-time): * lisp/gnus/nnheader.el (nnheader-last-message-time): * lisp/gnus/nnrss.el (nnrss-request-expire-articles): * lisp/vc/ediff-util.el (ediff-command-begin-time) (ediff-calc-command-time, ediff-profile): Prefer an integer like 0 to a timestamp list like (0 0) where either will do.
Diffstat (limited to 'lisp/epg.el')
-rw-r--r--lisp/epg.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/epg.el b/lisp/epg.el
index c5d946cb76c..c3c26badbba 100644
--- a/lisp/epg.el
+++ b/lisp/epg.el
@@ -606,7 +606,7 @@ callback data (if any)."
process
terminal-name
agent-file
- (agent-mtime '(0 0 0 0)))
+ (agent-mtime 0))
;; Set GPG_TTY and TERM for pinentry-curses. Note that we can't
;; use `terminal-name' here to get the real pty name for the child
;; process, though /dev/fd/0" is not portable.
@@ -633,7 +633,7 @@ callback data (if any)."
(setq agent-file (match-string 1 agent-info)
agent-mtime (or (file-attribute-modification-time
(file-attributes agent-file))
- '(0 0 0 0))))
+ 0)))
(if epg-debug
(save-excursion
(unless epg-debug-buffer