01/02: gnu: neofetch: Remove dead code.

[Tobias Geerinckx-Rice]

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.