[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#69343] [PATCH 04/12] Rename seconds->string procedure to epoch->dat
From: |
Felix Lechner |
Subject: |
[bug#69343] [PATCH 04/12] Rename seconds->string procedure to epoch->date-string. |
Date: |
Fri, 23 Feb 2024 17:51:37 -0800 |
Change-Id: I2b9aaa816b3ca84c32f7d6fa690245b149228310
---
guix/scripts/system.scm | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/guix/scripts/system.scm b/guix/scripts/system.scm
index 40df166fd7..86ee2ddc76 100644
--- a/guix/scripts/system.scm
+++ b/guix/scripts/system.scm
@@ -323,9 +323,9 @@ (define-syntax-rule (unless-file-not-found exp)
#f
(apply throw args)))))
-(define (seconds->string seconds)
- "Return a string representing the date for SECONDS."
- (let ((time (make-time time-utc 0 seconds)))
+(define (epoch->date-string epoch)
+ "Return a string representing the date for EPOCH seconds."
+ (let ((time (make-time time-utc 0 epoch)))
(date->string (time-utc->date time)
"~Y-~m-~d ~H:~M")))
@@ -343,7 +343,7 @@ (define* (profile-boot-parameters #:optional (profile
%system-profile)
(inherit params)
(label (string-append label " (#"
(number->string number) ", "
- (seconds->string time) ")"))))))
+ (epoch->date-string time) ")"))))))
(let* ((systems (map (cut generation-file-name profile <>)
numbers))
(times (map (lambda (system)
--
2.41.0
- [bug#69343] [PATCH 00/12] Simplify bootloader data structures and procedures, Felix Lechner, 2024/02/23
- [bug#69343] [PATCH 03/12] Also move boot-parameters->menu-entry., Felix Lechner, 2024/02/23
- [bug#69343] [PATCH 11/12] Split generation->boot-parameters out of profile->boot-alternatives., Felix Lechner, 2024/02/23
- [bug#69343] [PATCH 08/12] Rename two remote variables confusingly named 'generations'., Felix Lechner, 2024/02/23
- [bug#69343] [PATCH 09/12] Give a separate name to a commonly used expression., Felix Lechner, 2024/02/23
- [bug#69343] [PATCH 04/12] Rename seconds->string procedure to epoch->date-string.,
Felix Lechner <=
- [bug#69343] [PATCH 10/12] Simplify profile->boot-alternatives., Felix Lechner, 2024/02/23
- [bug#69343] [PATCH 06/12] Offer a uniform decorated-boot-label and use it., Felix Lechner, 2024/02/23
- [bug#69343] [PATCH 05/12] Move epoch->date-string to gnu/system/boot.scm and use it elsewhere., Felix Lechner, 2024/02/23
- [bug#69343] [PATCH 01/12] Fix bug where the extra menu entries for a bootloader were shown twice., Felix Lechner, 2024/02/23
- [bug#69343] [PATCH 12/12] Encapsulate <boot-parameters> to retain generation, system-path and epoch., Felix Lechner, 2024/02/23
- [bug#69343] [PATCH 07/12] Rename boot-parameters to boot-alternatives when appropriate., Felix Lechner, 2024/02/23
- [bug#69343] [PATCH 02/12] Move <boot-parameters> record to a separate file., Felix Lechner, 2024/02/23