nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: gnome-shell: Avoid top-level reference to inkscape. 

Fixes <https://bugs.gnu.org/34806>.
Reported by Marius Bakke <mbakke@fastmail.com>.

* gnu/packages/gnome.scm (gnome-shell)[source](snippet): Remove
reference to INKSCAPE.  Instead, simply copy the SVG file to
data/theme.
[arguments]: Add 'convert-logo-to-png' phase.
[native-inputs]: Add INKSCAPE.
This commit is contained in:
Ludovic Courtès 2019-03-10 23:29:39 +01:00
parent 5ae5932b2f
commit 45fef894eb
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 10 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
gnu/packages/gnome.scm
View File

@ -5695,10 +5695,9 @@ properties, screen resolution, and other GNOME parameters.")
(copy-file #$(file-append %artwork-repository
"/slim/0.x/background.png")
"data/theme/guix-background.png")
(invoke #+(file-append inkscape "/bin/inkscape")
"--export-png=data/theme/guix-logo.png"
#$(file-append %artwork-repository
"/logo/Guix-horizontal-white.svg"))
(copy-file #$(file-append %artwork-repository
"/logo/Guix-horizontal-white.svg")
"data/theme/guix-logo.svg")
#t))))
(build-system glib-or-gtk-build-system)
(arguments
@ -5711,6 +5710,11 @@ properties, screen resolution, and other GNOME parameters.")
(invoke "make" "-C" "data"
"theme/gnome-shell.css"
"theme/gnome-shell-high-contrast.css")))
(add-before 'build 'convert-logo-to-png
(lambda* (#:key inputs #:allow-other-keys)
;; Convert the logo from SVG to PNG.
(invoke "inkscape" "--export-png=data/theme/guix-logo.png"
"data/theme/guix-logo.svg")))
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
@ -5741,7 +5745,8 @@ properties, screen resolution, and other GNOME parameters.")
("pkg-config" ,pkg-config)
("python" ,python)
("xsltproc" ,libxslt)
("ruby-sass" ,ruby-sass)))
("ruby-sass" ,ruby-sass)
("inkscape" ,inkscape)))
(inputs
`(("accountsservice" ,accountsservice)
("caribou" ,caribou)