01/04: gnu: tome4: Clean up snippet.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit 53ac6977ac0bbd766d014d3b0aefea3958bbf54f
Author: Oleg Pykhalov <address@hidden>
Date:   Wed Jul 26 15:48:12 2017 +0300

    gnu: tome4: Clean up snippet.
    
    * gnu/packages/games.scm (tome4)[source](snippet): Use a single
    'substitute*' call instead of 'for-each'.
    
    Signed-off-by: Ludovic Courtès <address@hidden>
---
 gnu/packages/games.scm | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/games.scm b/gnu/packages/games.scm
index 071311a..d859a63 100644
--- a/gnu/packages/games.scm
+++ b/gnu/packages/games.scm
@@ -4633,12 +4633,10 @@ Crowther & Woods, its original authors, in 1995.  It 
has been known as
          "0v2qgdfpvdzd1bcbp9v8pfahj1bgczsq2d4xfhh5wg11jgjcwz03"))
        (modules '((guix build utils)))
        (snippet
-        '(for-each (lambda (file)
-                     (substitute* file
-                       (("#elif defined(__FreeBSD__)" line)
-                        (string-append
-                         line " || defined(__GNUC__)"))))
-                   '("src/music.h" "src/tSDL.h")))))
+        '(substitute* '("src/music.h" "src/tSDL.h")
+           (("#elif defined(__FreeBSD__)" line)
+            (string-append
+             line " || defined(__GNUC__)"))))))
     (build-system gnu-build-system)
     (native-inputs
      `(("unzip" ,unzip)))