diff options
author | Ricardo Wurmus <rekado@elephly.net> | 2018-11-12 18:21:04 +0100 |
---|---|---|
committer | Ricardo Wurmus <rekado@elephly.net> | 2018-11-12 18:21:04 +0100 |
commit | 1767581fb50d2b97e12053aca087b6a490156f1e (patch) | |
tree | 89996894df5ae70b615f06dd8be37908f1f8bc76 | |
parent | 8c5749f1b5255e37a6ef7b43e48fe0bbc57ce209 (diff) | |
download | gnu-guix-1767581fb50d2b97e12053aca087b6a490156f1e.tar gnu-guix-1767581fb50d2b97e12053aca087b6a490156f1e.tar.gz |
build-system/haskell: Fix register phase.
This is a follow-up to commit a7e231a2a3edbd6a70949432c1ff434d87f625ff.
Reported by Marius Bakke <mbakke@fastmail.com>.
* guix/build/haskell-build-system.scm (register): Use "when" instead of
"unless".
-rw-r--r-- | guix/build/haskell-build-system.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/build/haskell-build-system.scm b/guix/build/haskell-build-system.scm index 7b556f6431..23d97e6602 100644 --- a/guix/build/haskell-build-system.scm +++ b/guix/build/haskell-build-system.scm @@ -239,7 +239,7 @@ given Haskell package." (list (string-append "--gen-pkg-config=" config-file)))) (run-setuphs "register" params) ;; The conf file is created only when there is a library to register. - (unless (file-exists? config-file) + (when (file-exists? config-file) (mkdir-p config-dir) (let* ((config-file-name+id (call-with-ascii-input-file config-file (cut grep id-rx <>)))) |