gnu: linux: Return #t from all phases.

* gnu/packages/linux.scm (iproute, ntfs-3g, cpupower, radeontop, tlp):
Return #t from all phases.
This commit is contained in:
Mark H Weaver 2018-06-27 20:46:38 -04:00
parent fccacffbf4
commit 9922278b25
No known key found for this signature in database
GPG key ID: 7CEF29847562C516

View file

@ -1251,7 +1251,8 @@ (define-public iproute
(lambda _
;; Don't attempt to create /var/lib/arpd.
(substitute* "Makefile"
(("^.*ARPDDIR.*$") "")))))))
(("^.*ARPDDIR.*$") ""))
#t)))))
(inputs
`(("iptables" ,iptables)
("db4" ,bdb)))
@ -3539,7 +3540,8 @@ (define-public ntfs-3g
(let* ((out (assoc-ref outputs "out"))
(sbin (string-append out "/sbin")))
(symlink "mount.ntfs-3g"
(string-append sbin "/mount.ntfs"))))))))
(string-append sbin "/mount.ntfs")))
#t)))))
(home-page "https://www.tuxera.com/community/open-source-ntfs-3g/")
(synopsis "Read-write access to NTFS file systems")
(description
@ -3696,7 +3698,8 @@ (define-public cpupower
'(#:phases (modify-phases %standard-phases
(add-after 'unpack 'enter-subdirectory
(lambda _
(chdir "tools/power/cpupower")))
(chdir "tools/power/cpupower")
#t))
(delete 'configure)
(add-before 'build 'fix-makefiles
(lambda _
@ -3704,7 +3707,8 @@ (define-public cpupower
(("/usr/") "/")
(("/bin/(install|pwd)" _ command) command))
(substitute* "bench/Makefile"
(("\\$\\(CC\\) -o") "$(CC) $(LDFLAGS) -o")))))
(("\\$\\(CC\\) -o") "$(CC) $(LDFLAGS) -o"))
#t)))
#:make-flags (let ((out (assoc-ref %outputs "out")))
(list (string-append "DESTDIR=" out)
(string-append "LDFLAGS=-Wl,-rpath=" out "/lib")
@ -4016,9 +4020,11 @@ (define-public radeontop
;; getver.sh uses git --describe, isn't worth an extra git
;; dependency, and doesn't even work on release(!) tarballs.
(add-after 'unpack 'report-correct-version
(lambda _ (substitute* "getver.sh"
(("ver=unknown")
(string-append "ver=" ,version)))))
(lambda _
(substitute* "getver.sh"
(("ver=unknown")
(string-append "ver=" ,version)))
#t))
(delete 'configure)) ; no configure script
#:make-flags (list "CC=gcc"
(string-append "PREFIX=" %output))
@ -4245,8 +4251,7 @@ (define-public tlp
#t))
(replace 'install
(lambda _
(invoke "make" "install-tlp" "install-man")
#t))
(invoke "make" "install-tlp" "install-man")))
(add-after 'install 'wrap
(lambda* (#:key inputs outputs #:allow-other-keys)
(let* ((bin (string-append (assoc-ref outputs "out") "/bin"))