aboutsummaryrefslogtreecommitdiffstats
path: root/app/Main.hs
diff options
context:
space:
mode:
authorLibravatar Alexander Foremny <aforemny@posteo.de>2023-12-13 03:47:14 +0100
committerLibravatar Alexander Foremny <aforemny@posteo.de>2023-12-13 04:50:01 +0100
commit2bbd2f8b692dd952903a9f1527f2779a916118ab (patch)
tree0ab292e196327f719a2e953bdaac70cf3be9abb5 /app/Main.hs
parent4426863f07901f626a537f2f0bb717b1bd1b0f6d (diff)
chore: uncache large issue fields
Diffstat (limited to 'app/Main.hs')
-rw-r--r--app/Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/app/Main.hs b/app/Main.hs
index 6ccc29a..603ab2a 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -626,7 +626,7 @@ editIssues issues = withSystemTempDirectory "anissue-edit" (go issues)
where
go :: [Issue] -> FilePath -> IO ()
go issues cwd = do
- mapM_ (\issue -> T.writeFile (fp issue) issue.rawText) issues
+ mapM_ (\issue -> T.writeFile (fp issue) =<< issue.rawText) issues
sh_ (proc "${EDITOR-vi} -- %" (map fp issues))
replaceTexts issues
where