diff options
| -rw-r--r-- | guix/build/go-build-system.scm | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/guix/build/go-build-system.scm b/guix/build/go-build-system.scm index bba05fd8c9..7f25e05d0d 100644 --- a/guix/build/go-build-system.scm +++ b/guix/build/go-build-system.scm @@ -4,7 +4,7 @@ ;;; Copyright © 2019 Maxim Cournoyer <[email protected]> ;;; Copyright © 2020 Jack Hill <[email protected]> ;;; Copyright © 2020 Jakub Kądziołka <[email protected]> -;;; Copyright © 2020, 2021, 2023 Efraim Flashner <[email protected]> +;;; Copyright © 2020, 2021 Efraim Flashner <[email protected]> ;;; Copyright © 2021 Sarah Morgensen <[email protected]> ;;; ;;; This file is part of GNU Guix. @@ -227,10 +227,9 @@ unpacking." (when (string-null? import-path) (display "WARNING: The Go import path is unset.\n")) - (let ((dest (string-append (getenv "GOPATH") "/src/" - (if (string-null? unpack-path) - import-path - unpack-path)))) + (when (string-null? unpack-path) + (set! unpack-path import-path)) + (let ((dest (string-append (getenv "GOPATH") "/src/" unpack-path))) (mkdir-p dest) (if (file-is-directory? source) (copy-recursively source dest #:keep-mtime? #t) |