gnu: renpy: Use new style.

* gnu/packages/game-development.scm (renpy)[arguments]: Change to list of
G-Expressions.
[inputs]: Drop labels.
[native-inputs, outputs]: Squash to single line.

gnu/packages/game-development.scm

@@ -48,6 +48,7 @@
   #:use-module (ice-9 match)
   #:use-module ((guix licenses) #:prefix license:)
   #:use-module (guix packages)
+  #:use-module (guix gexp)
   #:use-module (guix download)
   #:use-module (guix git-download)
   #:use-module (guix svn-download)
@@ -1352,13 +1353,14 @@ are only used to bootstrap it.")
     (name "renpy")
     (build-system python-build-system)
     (arguments
-     `(#:tests? #f ; see python-renpy
-       #:modules ((srfi srfi-1)
+     (list
+      #:tests? #f ; see python-renpy
+      #:modules '((srfi srfi-1)
                   (guix build python-build-system)
                   (guix build utils))
-       #:imported-modules ((srfi srfi-1) ,@%python-build-system-modules)
+      #:imported-modules `((srfi srfi-1) ,@%python-build-system-modules)
       #:phases
-       (modify-phases %standard-phases
+      #~(modify-phases %standard-phases
           (add-after 'unpack 'fix-commands
             (lambda* (#:key inputs outputs #:allow-other-keys)
               (substitute* "launcher/game/choose_directory.rpy"
@@ -1403,7 +1405,7 @@ are only used to bootstrap it.")
               ;;     `-- gui
               ;;
               ;; Note that common shares the source files that would be installed
-             ;; by python-renpy (which are instead deleted from that package),
+              ;; by python2-renpy (which are instead deleted from that package),
               ;; but also contains their byte-compiled versions.
               ;; On other systems, renpy_base would point to site-packages or
               ;; even somewhere in /opt.
@@ -1432,7 +1434,8 @@ are only used to bootstrap it.")
                                   (string-append out "/share/renpy/gui"))
 
                 (mkdir-p (string-append out "/bin"))
-               (copy-file (assoc-ref inputs "renpy.in") bin/renpy)
+                (copy-file #$(local-file (search-auxiliary-file "renpy/renpy.in"))
+                           bin/renpy)
                 (substitute* bin/renpy
                   (("@PYTHON@") (search-input-file inputs "bin/python3"))
                   (("@RENPY_BASE@") (string-append out "/share/renpy")))
@@ -1487,21 +1490,17 @@ are only used to bootstrap it.")
                                      (lambda (input)
                                        (string-prefix? "python" (car input)))
                                      inputs))))))))))))))
-    (inputs
-     `(("bash-minimal" ,bash-minimal)
-       ("renpy.in" ,(search-auxiliary-file "renpy/renpy.in"))
-       ("python-pefile" ,python-pefile)
-       ("python-requests" ,python-requests)
-       ("python-renpy" ,python-renpy)
-       ("python:tk" ,python "tk")
-       ("python-six" ,python-six)
-       ("python" ,python) ; for ‘fix-commands’ and ‘wrap’
-       ("xdg-utils" ,xdg-utils)))
+    (inputs (list bash-minimal
+                  python
+                  python-pefile
+                  python-requests
+                  python-renpy
+                  python-six
+                  `(,python "tk")
+                  xdg-utils))
     (propagated-inputs '())
-    (native-inputs
-     (list xorg-server-for-tests))
-    (outputs
-     (list "out" "tutorial" "the-question"))
+    (native-inputs (list xorg-server-for-tests))
+    (outputs (list "out" "tutorial" "the-question"))
     (home-page "https://www.renpy.org/")
     (synopsis "Visual Novel Engine")
     (description "Ren'Py is a visual novel engine that helps you use words,