blob: 7dddd97f58369b592df7ca3fa5d84fb11b50b424 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
(define-library (config git)
(export git-config)
(import (scheme base)
(ini))
(begin
(define git-config
(parameterize
((current-output-port
(open-output-string)))
(scm->ini
'((init
("defaultBranch" . "master"))
(core
("editor" . "emacsclient -c"))
(user
("email" . "contact@robbyzambito.me")
("name" . "Robby Zambito"))
;; see push.autoSetupRemote in git help config
(push
("autoSetupRemote" . "true"))
("url \"rad://\""
("insteadOf" . "https://rad.go/"))))
(get-output-string (current-output-port))))))
|
