aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLibravatar Fabian Kirchner <kirchner@posteo.de>2024-03-13 14:37:46 +0100
committerLibravatar Alexander Foremny <aforemny@posteo.de>2024-03-14 07:07:45 +0100
commite39c2a2d09fde36ba7c2b5d09a9a8987221d0f5a (patch)
tree0895fe7d63e760e9f3a422c00878c8fefb9f535b
parent428e61e202fefe7941a78bd57f5e14d056a74702 (diff)
fix: strip b/ from destinations when committing review
-rw-r--r--app/Review.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/app/Review.hs b/app/Review.hs
index b1cd21b..37d9ee4 100644
--- a/app/Review.hs
+++ b/app/Review.hs
@@ -189,7 +189,7 @@ commitReview plan patch = do
T.writeFile (tmp </> "review.patch") (renderAsText patch)
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 add %" (map (T.drop (T.length "b/") . (.fileDeltaDestFile)) patch.fileDeltas))
sh_ (proc "git commit --allow-empty --template %/commit_editmsg" tmp)
commit_editmsg :: Plan -> T.Text