gnu: emacs-w3m: Return #t from phases.

* gnu/packages/emacs.scm (emacs-w3m)[arguments]: Substitute INVOKE for
SYSTEM* & risky plumbing.
This commit is contained in:
Tobias Geerinckx-Rice 2018-06-20 02:55:56 +02:00
parent ff6275fd26
commit 93adf925ba
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79

View file

@ -793,7 +793,7 @@ (define-public emacs-w3m
(modify-phases %standard-phases
(add-after 'unpack 'autoconf
(lambda _
(zero? (system* "autoconf"))))
(invoke "autoconf")))
(add-before 'configure 'support-emacs!
(lambda _
;; For some reason 'AC_PATH_EMACS' thinks that 'Emacs 26' is
@ -824,13 +824,13 @@ (define-public emacs-w3m
#t)))
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(and (zero? (system* "make" "install" "install-icons"))
(with-directory-excursion
(string-append (assoc-ref outputs "out")
"/share/emacs/site-lisp")
(for-each delete-file '("ChangeLog" "ChangeLog.1"))
(symlink "w3m-load.el" "w3m-autoloads.el")
#t)))))))
(invoke "make" "install" "install-icons")
(with-directory-excursion
(string-append (assoc-ref outputs "out")
"/share/emacs/site-lisp")
(for-each delete-file '("ChangeLog" "ChangeLog.1"))
(symlink "w3m-load.el" "w3m-autoloads.el")
#t))))))
(home-page "http://emacs-w3m.namazu.org/")
(synopsis "Simple Web browser for Emacs based on w3m")
(description