02/02: gnu: ams-lv2: Always return #t from phase remove-sse-flags.

[guix-commits]

hoebjo pushed a commit to branch core-updates
in repository guix.

commit 6cbb2c87216e37f4d11a36d3d95d6c5fa5dc9216
Author: Björn Höfling <address@hidden>
Date:   Mon Nov 26 17:24:21 2018 +0100

    gnu: ams-lv2: Always return #t from phase remove-sse-flags.
    
    * gnu/packages/music.scm (ams-lv2)[arguments]: Use '(unless' instead of
    '(when (not'. Return with #t as last value from phase 'remove-sse-flags'.
---
 gnu/packages/music.scm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm
index 21659a6..568b6f4 100644
--- a/gnu/packages/music.scm
+++ b/gnu/packages/music.scm
@@ -2310,11 +2310,11 @@ follows a traditional multi-track tape recorder control 
paradigm.")
          (modify-phases %standard-phases
            (add-after 'unpack 'remove-sse-flags
              (lambda* (#:key system #:allow-other-keys)
-               (when (not (or (string-prefix? "x86_64" system)
-                              (string-prefix? "i686" system)))
+               (unless (or (string-prefix? "x86_64" system)
+                              (string-prefix? "i686" system))
                      (substitute* "wscript"
-                       (("'-msse', '-mfpmath=sse', ") ""))
-                     #t))))
+                       (("'-msse', '-mfpmath=sse', ") "")))
+               #t)))
          #:tests? #f)) ; no tests
       (inputs
        `(("lv2" ,lv2)