summary refs log tree commit diff
diff options
context:
space:
mode:
authorMaxim Cournoyer <maxim.cournoyer@gmail.com>2023-02-20 09:16:00 -0500
committerMaxim Cournoyer <maxim.cournoyer@gmail.com>2023-02-20 09:22:04 -0500
commit8320c0c6b6486f1991aa99246460ec955add65c7 (patch)
tree866baf1b17a07b1db964de6b5e10264c012ed2fa
parente2435b60f11265ec6a2fffccda3b7a65393535cc (diff)
downloadguix-8320c0c6b6486f1991aa99246460ec955add65c7.tar.gz
gnu: icedove: Install the icons of the 'comm' component.
This is a follow-up commit to 47f0e022dc ("gnu: icedove: Install icons.")
which installed the icons of the 'browser' component (which are those used by
IceCat).

* gnu/packages/gnuzilla.scm (icedove-minimal) [phases]
{install-icon}: Install the icons of the 'comm' component, which is Icedove.
-rw-r--r--gnu/packages/gnuzilla.scm7
1 files changed, 4 insertions, 3 deletions
diff --git a/gnu/packages/gnuzilla.scm b/gnu/packages/gnuzilla.scm
index 6a9d3d18ad..eb6395cb56 100644
--- a/gnu/packages/gnuzilla.scm
+++ b/gnu/packages/gnuzilla.scm
@@ -1459,8 +1459,10 @@ ca495991b7852b855"))
                             Exec=~@*~a/bin/icedove -compose~%"
                             #$output))))))
           (add-after 'install-desktop-file 'install-icons
+            ;; TODO: Use actual Icedove branding icons (currently the stock
+            ;; Thunderbird icon is used).
             (lambda _
-              (with-directory-excursion "browser/branding/official"
+              (with-directory-excursion "comm/mail/branding/thunderbird"
                 (for-each
                  (lambda (file)
                    (let* ((size (string-filter char-numeric? file))
@@ -1469,8 +1471,7 @@ ca495991b7852b855"))
                      (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")))))
+                   "default32.png" "default48.png" "default256.png")))))
           (add-after 'install 'wrap-program
             (lambda* (#:key inputs #:allow-other-keys)
               (let* ((lib (string-append #$output "/lib"))