Defined a git macro to make it easier to define git commands.

diff --git a/git-skipper.cl b/git-skipper.cl
index e69de29..66a0c18 100644 (file)
--- a/git-skipper.cl
+++ b/git-skipper.cl
@@ -0,0 +1,7 @@
+(ql:quickload "cl-utilities")
+
+(in-package :cl-user)
+
+(defmacro git (&rest arguments)
+  `(mapcar (lambda (x) (string-trim " " x))
+           (cl-utilities:split-sequence #\newline (uiop:run-program (list "git" ,@arguments) :input nil :output :string))))