diff options
author | Alexander Foremny <aforemny@posteo.de> | 2024-03-13 06:18:58 +0100 |
---|---|---|
committer | Alexander Foremny <aforemny@posteo.de> | 2024-03-14 07:07:45 +0100 |
commit | dbcc58147027db21beaafab4d3fdbc349a5a22a0 (patch) | |
tree | 66798eddadd869125c2cc665eeb8e1d48ba39db7 /app/Review.hs | |
parent | 7f0066cafd2a91959ef618ef8342524ca30a328f (diff) |
chore: fix applying review
Diffstat (limited to 'app/Review.hs')
-rw-r--r-- | app/Review.hs | 2 |
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) |