02/02: gnu: crawl: Honor the #:tests? flag.

[guix-commits]

ngz pushed a commit to branch master
in repository guix.

commit 6199ee19ff84f904972fcc703442dff24018ef4d
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
AuthorDate: Wed Aug 24 16:06:46 2022 +0200

    gnu: crawl: Honor the #:tests? flag.
    
    * gnu/packages/games.scm (crawl)[arguments]<#:phases>: Honor the #:tests? 
flag
    in custom check phase.
---
 gnu/packages/games.scm | 19 ++++++++++---------
 1 file changed, 10 insertions(+), 9 deletions(-)

diff --git a/gnu/packages/games.scm b/gnu/packages/games.scm
index 71abc57dd2..ebf805c119 100644
--- a/gnu/packages/games.scm
+++ b/gnu/packages/games.scm
@@ -6568,15 +6568,16 @@ fish.  The whole game is accompanied by quiet, 
comforting music.")
                 (("SDL_image.h") "SDL2/SDL_image.h"))))
           (delete 'configure)
           (replace 'check
-            (lambda* (#:key make-flags #:allow-other-keys)
-              (setenv "HOME" (getcwd))
-              ;; Fake a terminal for the test cases.
-              (setenv "TERM" "xterm-256color")
-              ;; Run the tests that don't require a debug build.
-              (apply invoke "make" "nondebugtest"
-                     (format #f "-j~d" (parallel-job-count))
-                     ;; Force command line build for test cases.
-                     (append make-flags '("GAME=crawl" "TILES="))))))))
+            (lambda* (#:key tests? make-flags #:allow-other-keys)
+              (when tests?
+                (setenv "HOME" (getcwd))
+                ;; Fake a terminal for the test cases.
+                (setenv "TERM" "xterm-256color")
+                ;; Run the tests that don't require a debug build.
+                (apply invoke "make" "nondebugtest"
+                       (format #f "-j~d" (parallel-job-count))
+                       ;; Force command line build for test cases.
+                       (append make-flags '("GAME=crawl" "TILES=")))))))))
     (synopsis "Roguelike dungeon crawler game")
     (description "Dungeon Crawl Stone Soup (also known as \"Crawl\" or DCSS
 for short) is a roguelike adventure through dungeons filled with dangerous