TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

gnu: emacs-treemacs: Update to 2.9.

Browse source 
* gnu/packages/emacs-xyz.scm (emacs-treemacs): Update to 2.9.
[arguments]<#:phases>: Remove useless phase.
<#:test-command>: Add command.
This commit is contained in:
Nicolas Goaziou 2021-09-25 22:29:34 +02:00
parent 40a6d8eb7d
commit 212ee1140a
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D
1 changed files with 7 additions and 19 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

26
gnu/packages/emacs-xyz.scm
View file

@ -23706,7 +23706,7 @@ (define-public emacs-pfuture
(define-public emacs-treemacs
(package
(name "emacs-treemacs")
(version "2.8")
(version "2.9")
(source (origin
(method git-fetch)
(uri (git-reference
@ -23715,7 +23715,7 @@ (define-public emacs-treemacs
(file-name (git-file-name name version))
(sha256
(base32
"0m083g3pg0n4ymi1w0jx34awr7cqbm4r561adij9kklblxsz7sc2"))))
"141mgd742grvs94mnr62w1fiwmlhkq8b2131dh4mqrdjgcrd1kl8"))))
(build-system emacs-build-system)
(propagated-inputs
`(("emacs-ace-window" ,emacs-ace-window)
@ -23732,6 +23732,7 @@ (define-public emacs-treemacs
`(("python" ,python)))
(arguments
`(#:tests? #t
#:test-command '("make" "-C" "../.." "test")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'fix-makefile
@ -23739,22 +23740,11 @@ (define-public emacs-treemacs
(substitute* "Makefile"
(("@\\$\\(CASK\\) exec ") "")
;; Guix does not need to prepare dependencies before testing.
(("test: prepare") "test:"))
#t))
(("test: prepare") "test:"))))
(add-after 'fix-makefile 'chdir-elisp
;; Elisp directory is not in root of the source.
(lambda _
(chdir "src/elisp")))
(replace 'check
;; FIXME: Work around ‘treemacs--parse-collapsed-dirs’ and
;; `treemacs-collect-child-nodes' test failures.
(lambda _
(with-directory-excursion "../.." ;treemacs root
(chmod "test/test-treemacs.el" #o644)
(emacs-substitute-sexps "test/test-treemacs.el"
("(describe \"treemacs--parse-collapsed-dirs\"" "")
("\"Finds only direct childre\"" ""))
(invoke "make" "test"))))
(add-before 'install 'patch-paths
(lambda* (#:key inputs outputs #:allow-other-keys)
(with-directory-excursion "../.." ;treemacs root
@ -23771,18 +23761,16 @@ (define-public emacs-treemacs
(string-append (assoc-ref inputs "python") "/bin/python3")))
(chmod "src/elisp/treemacs-async.el" #o644)
(substitute* "src/elisp/treemacs-async.el"
(("src/scripts") (string-append "share/" ,name "/scripts"))))
#t))
(("src/scripts") (string-append "share/" ,name "/scripts"))))))
(add-after 'install 'install-data
(lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out")))
(with-directory-excursion "../.." ;treemacs root
(copy-recursively "icons/default"
(string-append out "/share/" ,name "/images"))
(string-append out "/share/" ,name "/images"))
(copy-recursively
"src/scripts"
(string-append out "/share/" ,name "/scripts"))
#t)))))))
(string-append out "/share/" ,name "/scripts")))))))))
(home-page "https://github.com/Alexander-Miller/treemacs")
(synopsis "Emacs tree style file explorer")
(description