diff options
author | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2023-02-09 09:01:51 -0500 |
---|---|---|
committer | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2023-02-10 09:21:24 -0500 |
commit | 688fe3efe760004ffc2a40dd027169db435ce4cb (patch) | |
tree | feb7ccdf4f732e8365dd16ae7ea9ae9affb261b9 | |
parent | 47a9030dd224b6076c1fbb7bbdb1ec7ba11546fe (diff) | |
download | guix-patches-688fe3efe760004ffc2a40dd027169db435ce4cb.tar guix-patches-688fe3efe760004ffc2a40dd027169db435ce4cb.tar.gz |
gnu: icedove: Install icons.
* gnu/packages/gnuzilla.scm (icedove) [phases]: Add install-icons phase.
Series-to: 61391@debbugs.gnu.org
Cover-letter:
Improvements to Icedove (icons, gexps, un-bundling)
Hi Guix,
This series improves our Icedove package a bit, unbundling NSS and producing
its icon so that it looks more tidy in GNOME or other desktop environments.
Thanks!
END
-rw-r--r-- | gnu/packages/gnuzilla.scm | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/gnu/packages/gnuzilla.scm b/gnu/packages/gnuzilla.scm index ecb8edd914..ec9a3409ba 100644 --- a/gnu/packages/gnuzilla.scm +++ b/gnu/packages/gnuzilla.scm @@ -1347,6 +1347,19 @@ ca495991b7852b855")) Name=Write new message~@ Exec=~@*~a/bin/icedove -compose~%" #$output)))))) + (add-after 'install-desktop-file 'install-icons + (lambda _ + (with-directory-excursion "browser/branding/official" + (for-each + (lambda (file) + (let* ((size (string-filter char-numeric? file)) + (icons (string-append #$output "/share/icons/hicolor/" + size "x" size "/apps"))) + (mkdir-p icons) + (copy-file file (string-append icons "/icedove.png")))) + '("default16.png" "default22.png" "default24.png" + "default32.png" "default48.png" "content/icon64.png" + "mozicon128.png" "default256.png"))))) (add-after 'install 'wrap-program (lambda* (#:key inputs #:allow-other-keys) (let* ((lib (string-append #$output "/lib")) |