guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

01/04: gnu: lirc: Remove obsolete trailing #t.


From: guix-commits
Subject: 01/04: gnu: lirc: Remove obsolete trailing #t.
Date: Fri, 20 Jan 2023 12:05:50 -0500 (EST)

nckx pushed a commit to branch master
in repository guix.

commit 4e4ea85c260a3f668b1ba46be4fc6a6d06aa093c
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Sun Jan 15 01:00:00 2023 +0100

    gnu: lirc: Remove obsolete trailing #t.
    
    * gnu/packages/lirc.scm (lirc)[arguments]:
    Don't explicitly return #t from phases.
---
 gnu/packages/lirc.scm | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/lirc.scm b/gnu/packages/lirc.scm
index a2e542b2ce..c0b5780c30 100644
--- a/gnu/packages/lirc.scm
+++ b/gnu/packages/lirc.scm
@@ -63,16 +63,14 @@
              ;; Correct the faulty assumption that systemd support should be
              ;; hard-wired when a build host's /proc/version contains "Ubuntu".
              (substitute* "configure"
-               (("kernelversion=.*") "kernelversion=irrelevant\n"))
-             #t))
+               (("kernelversion=.*") "kernelversion=irrelevant\n"))))
          (add-after 'unpack 'patch-lirc-make-devinput
            (lambda* (#:key inputs #:allow-other-keys)
              ;; 'lirc-make-devinput' script assumes that linux headers
              ;; are placed in "/usr/...".
              (let ((headers (assoc-ref inputs "kernel-headers")))
                (substitute* "tools/lirc-make-devinput"
-                 (("/usr/include") (string-append headers "/include"))))
-             #t))
+                 (("/usr/include") (string-append headers "/include"))))))
          (add-after 'unpack 'patch-doc/Makefile.in
            (lambda _
              ;; Lirc wants to install several images and a useless html page
@@ -82,8 +80,7 @@
              ;; "share/doc/lirc/images/" anyway).
              (substitute* "doc/Makefile.in"
                (("^vardocs_DATA =.*") "vardocs_DATA =\n")
-               (("^varimage_DATA =.*") "varimage_DATA =\n"))
-             #t))
+               (("^varimage_DATA =.*") "varimage_DATA =\n"))))
          (add-after 'unpack 'omit-pip-sourceball
            ;; ‘make install’ invokes ’setup.py sdist’, which has no known (to
            ;; nckx) way to enforce mtimes.  The utility of this is 
questionable,



reply via email to

[Prev in Thread] Current Thread [Next in Thread]