From c386aac0c538043b47259e369debc473c14e93a4 Mon Sep 17 00:00:00 2001 From: Saba Saba Date: Thu, 9 Feb 2023 12:26:20 -0500 Subject: [PATCH] Implemended config-diff --- git-repl.cl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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" -- 2.20.1