From 48dd8ad2bd87c17843e94abc8f10403e5a45e80a Mon Sep 17 00:00:00 2001
From: Timo Wilken
Date: Mon, 1 May 2023 14:15:03 +0200
Subject: Build simutrans with the right name in the first place

---
 tw/packages/games.scm | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/tw/packages/games.scm b/tw/packages/games.scm
index 68fa2f62..36c1c24d 100644
--- a/tw/packages/games.scm
+++ b/tw/packages/games.scm
@@ -89,7 +89,7 @@
     (arguments
      `(#:make-flags
        '("VERBOSE=1" "OPTIMISE=1" "OSTYPE=linux" "BACKEND=sdl2" "MULTI_THREAD=1"
-         "USE_ZSTD=1" "USE_FREETYPE=1" "USE_FLUIDSYNTH_MIDI=1")
+         "USE_ZSTD=1" "USE_FREETYPE=1" "USE_FLUIDSYNTH_MIDI=1" "PROG=simutrans")
        #:tests? #f           ; tests don't work as SDL2 can't find a video device
        #:test-target "test"  ; run "make test" for tests
        #:phases
@@ -110,9 +110,7 @@
                 (let ((out (assoc-ref outputs "out")))
                   ;; Install "real" simutrans executable into libexec, as we need
                   ;; a wrapper script to be installed by `simutrans-pak-union'.
-                  (with-directory-excursion "build/default"
-                    (rename-file "sim" "simutrans")
-                    (install-file "simutrans" (string-append out "/libexec")))
+                  (install-file "build/default/simutrans" (string-append out "/libexec"))
 
                   ;; Install game data bundled with simutrans (not the pak).
                   (let ((data (string-append out "/share/games/simutrans")))
-- 
cgit v1.2.3