Added set-config

diff --git a/git-repl.cl b/git-repl.cl
index 5f74a9c..34b3e29 100644 (file)
--- a/git-repl.cl
+++ b/git-repl.cl
@@ -199,6 +199,12 @@
   "Saves the current configuration to the specified file"
   (config-do (str:to-file file-path (run-git '("diff")))))
 
+(defun-public set-config (file-path)
+  "Applies the configuration from the specified file and skips it"
+  (clean-working-directory
+    (git "apply" file-path)
+    (skip-modified)))
+
 (defun-public delete-branch (branch-name)
   "Deletes the given local branch name"
   (git "branch" "-d" branch-name))