From 7e09f0876701cf548c6b029b62b795b74d35c080 Mon Sep 17 00:00:00 2001
From: Hannes Mehnert <hannes@mehnert.org>
Date: Thu, 14 Nov 2024 16:35:56 +0100
Subject: [PATCH] print git last modified as well as HTTP date

---
 mirage/unikernel.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/mirage/unikernel.ml b/mirage/unikernel.ml
index 35151f2..b100ede 100644
--- a/mirage/unikernel.ml
+++ b/mirage/unikernel.ml
@@ -678,7 +678,7 @@ stamp: %S
           (KV.free disk.Disk.dev)
           !archives
           !remaining_downloads
-          (Ptime.to_rfc3339 ?tz_offset_s:None !last_git)
+          (ptime_to_http_date !last_git)
           (match !last_git_status with Ok x -> "ok with " ^ string_of_int x ^ " changes" | Error msg -> "error " ^ msg)
       in
       let sort_by_ts a b = Ptime.compare b a in