11/13: gnu: nyancat: Refresh package style.

[guix-commits]

sharlatan pushed a commit to branch master
in repository guix.

commit a14644779d88c5851d15a5b69a9d9f8bcb018e0a
Author: Sharlatan Hellseher <sharlata...@gmail.com>
AuthorDate: Thu Feb 13 09:16:07 2025 +0000

    gnu: nyancat: Refresh package style.
    
    * gnu/packages/toys.scm (nyancat): Use G-Expressions simplify and fix
    indentation.
    [arguments]: Remove trailing #t from lambda.
    
    Change-Id: I73e7c6f5dd9f3454703de2fc00f452e2a590ab98
---
 gnu/packages/toys.scm | 41 ++++++++++++++++++++---------------------
 1 file changed, 20 insertions(+), 21 deletions(-)

diff --git a/gnu/packages/toys.scm b/gnu/packages/toys.scm
index 0831498522..f1afc2fe5a 100644
--- a/gnu/packages/toys.scm
+++ b/gnu/packages/toys.scm
@@ -323,29 +323,28 @@ characters and lines resulting in a rainbow effect.")
     (name "nyancat")
     (version "1.5.2")
     (source
-      (origin
-        (method git-fetch)
-        (uri (git-reference
-               (url "https://github.com/klange/nyancat";)
-               (commit version)))
-        (file-name (git-file-name name version))
-        (sha256
-         (base32
-          "1mg8nm5xzcq1xr8cvx24ym2vmafkw53rijllwcdm9miiz0p5ky9k"))))
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/klange/nyancat";)
+             (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "1mg8nm5xzcq1xr8cvx24ym2vmafkw53rijllwcdm9miiz0p5ky9k"))))
     (build-system gnu-build-system)
     (arguments
-     `(#:make-flags '(,(string-append "CC=" (cc-for-target)))
-       #:phases
-       (modify-phases %standard-phases
-         (delete 'configure) ; no configure script
-         (replace 'install
-           (lambda* (#:key outputs #:allow-other-keys)
-             (let* ((out (assoc-ref outputs "out"))
-                    (bin (string-append out "/bin"))
-                    (man (string-append out "/share/man/man1")))
-               (install-file "src/nyancat" bin)
-               (install-file "nyancat.1" man))
-             #t)))))
+     (list
+      #:make-flags
+      #~(list (string-append "CC=" #$(cc-for-target)))
+      #:phases
+      #~(modify-phases %standard-phases
+          (delete 'configure) ; no configure script
+          (replace 'install
+            (lambda _
+              (let ((bin (string-append #$output "/bin"))
+                    (man (string-append #$output "/share/man/man1")))
+                (install-file "src/nyancat" bin)
+                (install-file "nyancat.1" man)))))))
     (home-page "https://nyancat.dakko.us/";)
     (synopsis "Nyan cat telnet server")
     (description