[shepherd] branch master updated: herd: Report the right time.

[Ludovic Courtès]

This is an automated email from the git hooks/post-receive script.

civodul pushed a commit to branch master
in repository shepherd.

The following commit(s) were added to refs/heads/master by this push:
     new 97e5869  herd: Report the right time.
97e5869 is described below

commit 97e586902d92c52da853ed170125dbc8b96f0bbe
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Tue May 9 08:51:46 2023 +0200

    herd: Report the right time.
    
    * modules/shepherd/scripts/herd.scm (time->string): Report (localtime
    time), not (localtime now).
---
 modules/shepherd/scripts/herd.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/modules/shepherd/scripts/herd.scm 
b/modules/shepherd/scripts/herd.scm
index 624b612..9891498 100644
--- a/modules/shepherd/scripts/herd.scm
+++ b/modules/shepherd/scripts/herd.scm
@@ -170,8 +170,8 @@ into a @code{live-service} record."
                      days)))))
 
   (define absolute
-    (let* ((time    (make-time time-utc 0 time))
-           (date    (time-utc->date time))
+    (let* ((time*   (make-time time-utc 0 time))
+           (date    (time-utc->date time*))
            (year    (date-year date))
            (now*    (time-utc->date now*))
            ;; Note: Use 'strftime' rather than 'date->string' to better
@@ -181,7 +181,7 @@ into a @code{live-service} record."
                             "%X"
                             "%c")
                         "%c")))
-      (strftime format (localtime now))))
+      (strftime format (localtime time))))
 
   ;; TRANSLATORS: The first placeholder is for a date string such as "April 22
   ;; 19:07:46" and the parenthesized placeholder is for the corresponding