[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/02: gnu: neofetch: Remove dead code.
From: |
Tobias Geerinckx-Rice |
Subject: |
01/02: gnu: neofetch: Remove dead code. |
Date: |
Wed, 20 Jun 2018 08:40:58 -0400 (EDT) |
nckx pushed a commit to branch master
in repository guix.
commit acb1c72c1eceffee2427b01b51299d8151aa180a
Author: Tobias Geerinckx-Rice <address@hidden>
Date: Wed Jun 20 14:34:31 2018 +0200
gnu: neofetch: Remove dead code.
Turns out that's most of it.
* gnu/packages/admin.scm (neofetch)[arguments]: Remove all custom
phases.
---
gnu/packages/admin.scm | 22 +---------------------
1 file changed, 1 insertion(+), 21 deletions(-)
diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index af9cdbf..fa8e600 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -2407,27 +2407,7 @@ tool for remote execution and deployment.")
(list (string-append "PREFIX=" %output))
#:phases
(modify-phases %standard-phases
- (add-after 'unpack 'patch-target-directories
- (lambda* (#:key outputs #:allow-other-keys)
- (let ((out (assoc-ref outputs "out")))
- (substitute* "Makefile"
- (("\\$\\(DESTDIR\\)/etc/")
- "$(PREFIX)/etc/"))
- (substitute* "neofetch"
- (("\"/etc/neofetch")
- (string-append "\"" out "/etc/neofetch"))
- (("\"/usr/share/neofetch")
- (string-append "\"" out "/share/neofetch"))))
- #t))
- (delete 'configure) ; no configure script
- (replace 'install
- (lambda* (#:key make-flags outputs #:allow-other-keys)
- (let* ((out (assoc-ref outputs "out"))
- (doc (string-append out "/share/doc/" ,name "-" ,version))
- (etc (string-append doc "/examples/etc")))
- (zero? (apply system* `("make" ,@make-flags
- ,(string-append "SYSCONFDIR=" etc)
- "install")))))))))
+ (delete 'configure)))) ; no configure script
(home-page "https://github.com/dylanaraps/neofetch")
(synopsis "System info script")
(description "Neofetch is a CLI system information tool written in Bash.