aboutsummaryrefslogtreecommitdiffstats
path: root/app/Review.hs
diff options
context:
space:
mode:
authorLibravatar Alexander Foremny <aforemny@posteo.de>2024-03-13 06:18:58 +0100
committerLibravatar Alexander Foremny <aforemny@posteo.de>2024-03-14 07:07:45 +0100
commitdbcc58147027db21beaafab4d3fdbc349a5a22a0 (patch)
tree66798eddadd869125c2cc665eeb8e1d48ba39db7 /app/Review.hs
parent7f0066cafd2a91959ef618ef8342524ca30a328f (diff)
chore: fix applying review
Diffstat (limited to 'app/Review.hs')
-rw-r--r--app/Review.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/app/Review.hs b/app/Review.hs
index 3b7afbe..b1cd21b 100644
--- a/app/Review.hs
+++ b/app/Review.hs
@@ -187,7 +187,7 @@ commitReview plan patch = do
withSystemTempDirectory "anissue" $ \tmp -> do
when (not (null patch.fileDeltas)) do
T.writeFile (tmp </> "review.patch") (renderAsText patch)
- sh_ (proc "patch -p0 <%/review.patch" tmp)
+ sh_ (proc "patch -p1 <%/review.patch" tmp)
T.writeFile (tmp </> "commit_editmsg") (commit_editmsg plan)
sh_ (proc "git add %" (map (.fileDeltaDestFile) patch.fileDeltas))
sh_ (proc "git commit --allow-empty --template %/commit_editmsg" tmp)