PSF: Stabilizing workspace after crash. Valid kernel/skill fixes.

projects/org-skill-git-steward/src/git-steward.lisp

@@ -0,0 +1,14 @@
+(defun git-status ()
+  "Executes git status and returns the output."
+  (uiop:run-program '("git" "status" "--short") :output :string))
+
+(defun git-commit (message)
+  "Stages all tracked changes and commits them."
+  (kernel-log "GIT - Committing: ~a" message)
+  (uiop:run-program '("git" "add" "-u"))
+  (uiop:run-program `("git" "commit" "-m" ,message)))
+
+(defun git-push ()
+  "Pushes to the current branch origin."
+  (kernel-log "GIT - Pushing to origin...")
+  (uiop:run-program '("git" "push")))