added command structure for git calling

This commit is contained in:
2026-08-12 14:58:47 +02:00
parent 5ee7145ac7
commit 7be7007285
3 changed files with 44 additions and 18 deletions
+4 -3
View File
@@ -150,6 +150,7 @@
(define (git-displ out)
(let ((str (if (string? out) out (string-join out "\n"))))
(info-git str)
(when (cfg-get 'git 'display-output #t)
(displayln str))))
(unless (string=? (string-trim str) "")
(info-git str)
(when (cfg-get 'git 'display-output #t)
(displayln str)))))