From e39c2a2d09fde36ba7c2b5d09a9a8987221d0f5a Mon Sep 17 00:00:00 2001 From: Fabian Kirchner Date: Wed, 13 Mar 2024 14:37:46 +0100 Subject: fix: strip b/ from destinations when committing review --- app/Review.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'app') 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 -- cgit v1.2.3