[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/03: build: go-build-system: Use WHEN for side-effect conditionals.
From: |
guix-commits |
Subject: |
02/03: build: go-build-system: Use WHEN for side-effect conditionals. |
Date: |
Sun, 5 May 2019 20:09:50 -0400 (EDT) |
apteryx pushed a commit to branch master
in repository guix.
commit 7e84d3eef724ef18f8e1c1b0932b6f74d3ae3e35
Author: Maxim Cournoyer <address@hidden>
Date: Thu Apr 4 23:26:04 2019 -0400
build: go-build-system: Use WHEN for side-effect conditionals.
* guix/build/go-build-system.scm (unpack): Replace single branch `if' by
`when'.
---
guix/build/go-build-system.scm | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/guix/build/go-build-system.scm b/guix/build/go-build-system.scm
index 973ee6e..92a5c86 100644
--- a/guix/build/go-build-system.scm
+++ b/guix/build/go-build-system.scm
@@ -158,6 +158,10 @@ unpacking."
((display "WARNING: The Go import path is unset.\n")))
(if (string-null? unpack-path)
(set! unpack-path import-path))
+ (when (string-null? import-path)
+ ((display "WARNING: The Go import path is unset.\n")))
+ (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)