From ae7ca186fe1b086e154a777ef69023a02f1e8708 Mon Sep 17 00:00:00 2001 From: me Date: Tue, 17 Dec 2024 10:47:00 +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)