From: Saba Saba <saba@sabadev.xyz>
Date: Thu, 9 Feb 2023 17:26:17 +0000 (-0500)
Subject: Stripping 'S ' from each file returned by skipped-files
X-Git-Url: http://sabadev.xyz:4321/?a=commitdiff_plain;h=d42f79f9aa394f8b7d1b1683d578091e68f6e96e;p=git-repl.git

Stripping 'S ' from each file returned by skipped-files
---

diff --git a/git-skipper.cl b/git-skipper.cl
index 7556966..91fa485 100644
--- a/git-skipper.cl
+++ b/git-skipper.cl
@@ -21,7 +21,7 @@
   (git "diff" "--name-only"))
 
 (defun skipped-files ()
-  (git "ls-files" "-v" "|" *grep* "^S"))
+  (mapcar (lambda (x) (str:substring 2 t x)) (git "ls-files" "-v" "|" *grep* "^S")))
 
 (defun skip-file (file-path)
   (git "update-index" "--skip-worktree" file-path))