From c5465b93f1586cdb6f455cd174f6694c57843237 Mon Sep 17 00:00:00 2001
From: me <me@campxfire.space>
Date: Thu, 7 Nov 2024 17:18:01 +0200
Subject: [PATCH] format time as rfc 2616

---
 src/Fedi/Signature/Sign.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Fedi/Signature/Sign.hs b/src/Fedi/Signature/Sign.hs
index 9f0c663..2b1e079 100644
--- a/src/Fedi/Signature/Sign.hs
+++ b/src/Fedi/Signature/Sign.hs
@@ -20,7 +20,7 @@ signSignature
   :: UserDetails -> String -> String -> ByteString -> IO HttpSignature
 signSignature details host requestTarget body = do
   date <- Time.getCurrentTime
-    <&> Time.formatTime Time.defaultTimeLocale Time.rfc822DateFormat
+    <&> Time.formatTime Time.defaultTimeLocale "%a, %d %b %Y %H:%M:%S GMT"
 
   let
     digest = "SHA-256=" <> encodeBase64 (makeDigest body)