|
@ -410,11 +410,12 @@ |
|
|
tags])) |
|
|
tags])) |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
(define (add-tag-alias) |
|
|
(define (add-tag-env post tag) |
|
|
; Should only run when the repo is first made |
|
|
(environment-variables-set! |
|
|
(system |
|
|
(current-environment-variables) |
|
|
"git config alias.tag !() { git notes --ref=$1 add HEAD -fm \"${*:2}\"}")) |
|
|
(string->bytes/utf-8 |
|
|
|
|
|
(regexp-replace* #px"\\/|\\." post "_")) |
|
|
|
|
|
tag)) |
|
|
|
|
|
|
|
|
;(parameterize ([current-commits (get-commits)]) |
|
|
;(parameterize ([current-commits (get-commits)]) |
|
|
|
|
|
|
|
|