brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix git mode.

Browse source
This commit is contained in:
Dominik Pantůček 2023-07-05 21:34:51 +02:00
parent 64ec7f3d69
commit 375c4ed857
2 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

6
doc/d-utils.md
View file

@ -93,9 +93,9 @@ This module provides basic git repository querying functionality.
Returns a procedure that allows invocation of git in given ```repo``` Returns a procedure that allows invocation of git in given ```repo```
repository returning one or two values based on ```mode``` given: repository returning one or two values based on ```mode``` given:
* ```#:exit``` - returns exit code * ```'exit``` - returns exit code
* ```#:output``` - returns the output lines (default) * ```'output``` - returns the output lines (default)
* ```#:exit+output``` - returns both exit code and output lines * ```'exit+output``` - returns both exit code and output lines
### git-status [procedure] ### git-status [procedure]

6
src/util-git.scm
View file

@ -69,9 +69,9 @@
Returns a procedure that allows invocation of git in given ```repo``` Returns a procedure that allows invocation of git in given ```repo```
repository returning one or two values based on ```mode``` given: repository returning one or two values based on ```mode``` given:
* ```#:exit``` - returns exit code * ```'exit``` - returns exit code
* ```#:output``` - returns the output lines (default) * ```'output``` - returns the output lines (default)
* ```#:exit+output``` - returns both exit code and output lines * ```'exit+output``` - returns both exit code and output lines
") ")
;; Raises an error if not valid ;; Raises an error if not valid
(let ((defmode (cadr (assq defmodesym git-modes)))) (let ((defmode (cadr (assq defmodesym git-modes))))