Added config management commands

diff --git a/git-repl.cl b/git-repl.cl
index 8517012..ae263ef 100644 (file)
--- a/git-repl.cl
+++ b/git-repl.cl
@@ -46,6 +46,22 @@
 (defun no-skip-all ()
   (mapcar #'no-skip-file (skipped-files)))
 
+(defun save-stash ()
+  (git "stash"))
+
+(defun pop-stash ()
+  (git "stash" "pop"))
+
+(defun stash-config ()
+  (progn
+    (no-skip-all)
+    (save-stash)))
+
+(defun pop-config ()
+  (progn
+    (pop-stash)
+    (skip-modified)))
+
 (defun delete-branch (branch-name)
   (git "branch" "-d" branch-name))