diff options
| -rw-r--r-- | gnu/packages/version-control.scm | 31 |
1 files changed, 15 insertions, 16 deletions
diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-control.scm index cf7a0ae084..9a703e9bbc 100644 --- a/gnu/packages/version-control.scm +++ b/gnu/packages/version-control.scm @@ -3937,22 +3937,21 @@ defects faster.") "1vkcmhh2qq8c38sjbnzf0wvg2rzr19wssaq177bsvrjwj1xz1qbs")))) (build-system go-build-system) (arguments - `(#:tests? #f ;requires network connection - #:import-path "github.com/go-git/go-git/v5" - #:phases - (modify-phases %standard-phases - (add-before 'build 'setup - (lambda* (#:key inputs #:allow-other-keys) - (let* ((git (assoc-ref inputs "git")) - (git-bin (string-append (assoc-ref inputs "git") "/bin")) - (git-exe (string-append git-bin "/git"))) - (setenv "GIT_DIST_PATH=" git) - (setenv "GIT_EXEC_PATH=" git-bin) - (setenv "HOME" (getcwd)) - (invoke git-exe "config" "--global" "user.email" "[email protected]") - (invoke git-exe "config" "--global" "user.name" "GitHub Actions") - #t) - #t))))) + (list + #:tests? #f ;requires network connection + #:import-path "github.com/go-git/go-git/v5" + #:phases + #~(modify-phases %standard-phases + (add-before 'build 'setup + (lambda* (#:key inputs #:allow-other-keys) + (let* ((git #$(this-package-native-input "git")) + (git-bin (string-append git "/bin")) + (git-exe (string-append git-bin "/git"))) + (setenv "GIT_DIST_PATH=" git) + (setenv "GIT_EXEC_PATH=" git-bin) + (setenv "HOME" (getcwd)) + (invoke git-exe "config" "--global" "user.email" "[email protected]") + (invoke git-exe "config" "--global" "user.name" "GitHub Actions"))))))) (propagated-inputs (list go-github-com-alcortesm-tgz go-github-com-emirpasic-gods |