From 70b409e51ea655c79fac20d9990b9644ddd4f19c Mon Sep 17 00:00:00 2001 From: r0man Date: Sat, 19 Mar 2022 15:33:24 +0100 Subject: [PATCH] Bundle emacs-lsp-treemacs icons --- gnu/packages/emacs-xyz.scm | 13 +++++++++++++ 1 file changed, 13 insertions(+) diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm index dcd36291fb..a1328ef57a 100644 --- a/gnu/packages/emacs-xyz.scm +++ b/gnu/packages/emacs-xyz.scm @@ -24429,6 +24429,19 @@ (define-public emacs-lsp-treemacs (sha256 (base32 "05ivqa5900139jzjhwc3nggwznhm8564dz4ydcxym2ddd63571k0")))) (build-system emacs-build-system) + (arguments + `(#:phases + (modify-phases %standard-phases + (add-before 'install 'patch-paths + (lambda* (#:key inputs outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (substitute* "lsp-treemacs-themes.el" + (("\\(f-join \\(f-dirname \\(or load-file-name buffer-file-name\\)\\) \"icons/([^\"]+)\"\\)" all name) + (string-append "\"" out "/share/" ,name "/icons/" name "\"")))))) + (add-after 'install 'install-data + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (copy-recursively "icons" (string-append out "/share/" ,name "/icons")))))))) (propagated-inputs (list emacs-lsp-mode emacs-treemacs)) (home-page "https://github.com/emacs-lsp/lsp-treemacs") -- 2.34.0