From 1290402724684a47b5f36f1158b7fbc7b5406a09 Mon Sep 17 00:00:00 2001 From: Alexander Foremny Date: Tue, 26 Mar 2024 05:25:42 +0100 Subject: fix: strip `git config` output --- app/Backend.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/app/Backend.hs b/app/Backend.hs index af6cebd..a3c1ee8 100644 --- a/app/Backend.hs +++ b/app/Backend.hs @@ -168,8 +168,8 @@ data Author = Author getCommitOf :: CommitHash -> IO Commit getCommitOf commitHash@WorkingTree = do date <- maybe getCurrentTime (pure . read) =<< lookupEnv "FAKETIME" - authorName <- sh "git config user.name" - authorEmail <- sh "git config user.email" + authorName <- T.strip <$> sh "git config user.name" + authorEmail <- T.strip <$> sh "git config user.email" pure Commit' { author = Author authorName authorEmail, -- cgit v1.2.3