me
/
guix
Archived
1
0
Fork 0

gnu: oneko: Remove trailing #t from phases.

* gnu/packages/toys.scm (oneko)[source]: Don't explicitly return #t from snippet…
[arguments]: …nor from phases.
master
Tobias Geerinckx-Rice 2022-06-05 02:00:04 +02:00
parent 7c52cad046
commit a7255dd13f
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 3 additions and 6 deletions

View File

@ -57,8 +57,7 @@
(for-each delete-file-recursively
(cons* "bitmaps/bsd" "bitmaps/sakura" "bitmaps/tomoyo"
"bitmasks/bsd" "bitmasks/sakura" "bitmasks/tomoyo"
(find-files "cursors" "(bsd|card|petal).*\\.xbm")))
#t))))
(find-files "cursors" "(bsd|card|petal).*\\.xbm")))))))
(build-system gnu-build-system)
(native-inputs
(list imake))
@ -73,8 +72,7 @@
(invoke "xmkmf")
;; Fix incorrectly generated compiler flags.
(substitute* "Makefile"
(("(CDEBUGFLAGS = ).*" _ front) (string-append front "-O2\n")))
#t))
(("(CDEBUGFLAGS = ).*" _ front) (string-append front "-O2\n")))))
(replace 'install
(lambda* (#:key outputs make-flags #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
@ -89,8 +87,7 @@
(copy-file "oneko.man" (string-append man6 "/oneko.6"))
(copy-file "oneko.man.jp" (string-append man6-ja "/oneko.6"))
(for-each (lambda (file) (install-file file doc))
(find-files "." "README.*")))
#t)))))
(find-files "." "README.*"))))))))
(home-page "http://www.daidouji.com/oneko/")
(synopsis "Cute cat chasing your mouse pointer")
(description "Displays a cat or another animated character that chases the