summary refs log tree commit diff
path: root/gnu/packages/gnuzilla.scm
diff options
context:
space:
mode:
authorMaxim Cournoyer <maxim.cournoyer@gmail.com>2023-02-09 09:01:51 -0500
committerMaxim Cournoyer <maxim.cournoyer@gmail.com>2023-02-13 16:08:11 -0500
commit47f0e022dcc3a7f3fbf36654d75a22a4e61a7dc5 (patch)
tree0ba7161e5aa528ec3ae96d79185864579b80852c /gnu/packages/gnuzilla.scm
parentfbd3565efc81f22faf9c52cb33ab0946c44682fd (diff)
downloadguix-47f0e022dcc3a7f3fbf36654d75a22a4e61a7dc5.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
Diffstat (limited to 'gnu/packages/gnuzilla.scm')
-rw-r--r--gnu/packages/gnuzilla.scm13
1 files changed, 13 insertions, 0 deletions
diff --git a/gnu/packages/gnuzilla.scm b/gnu/packages/gnuzilla.scm
index ef21673e2f..33b5744c17 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"))