From: Saba Saba <saba@sabadev.xyz>
Date: Thu, 9 Feb 2023 17:26:20 +0000 (-0500)
Subject: Implemended config-diff
X-Git-Url: http://sabadev.xyz:4321/?a=commitdiff_plain;h=c386aac0c538043b47259e369debc473c14e93a4;p=git-repl.git

Implemended config-diff
---

diff --git a/git-repl.cl b/git-repl.cl
index c46cfbf..c67a497 100644
--- a/git-repl.cl
+++ b/git-repl.cl
@@ -163,9 +163,9 @@
       (write-line "Skipping files...")
       (skip-modified))))
 
-(defun-public config-diff ()
+(defun-public config-diff (file-path)
   "Saves the current configuration to the specified file"
-  (config-do (mapcar #'write-line (git "diff"))))
+  (config-do (str:to-file file-path (run-git '("diff") :list-output nil))))
 
 (defun-public delete-branch (branch-name)
   "Deletes the given local branch name"