diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2017-05-08 17:20:12 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2017-05-09 00:18:05 +0200 |
| commit | 76f429ad9b669a0c72faf16b0be158ab040d4da2 (patch) | |
| tree | 18d32dbd8d02356d5bfbc798b6b3e29cd91c1451 | |
| parent | 4d8fd825a8adc528bc31501cec32ea4d11edcde8 (diff) | |
| download | patches-76f429ad9b669a0c72faf16b0be158ab040d4da2.tar patches-76f429ad9b669a0c72faf16b0be158ab040d4da2.tar.gz | |
system: grub: Use the native Guile-Cairo and Guile-SVG.
* gnu/system/grub.scm (svg->png): Use 'ungexp-native' aka. #+ when
referring to GUILE-CAIRO, GUILE-SVG, and SVG.
| -rw-r--r-- | gnu/system/grub.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gnu/system/grub.scm b/gnu/system/grub.scm index d2fa984ec7..58096429fe 100644 --- a/gnu/system/grub.scm +++ b/gnu/system/grub.scm @@ -144,15 +144,15 @@ denoting a file name." (with-imported-modules '((gnu build svg)) #~(begin ;; We need these two libraries. - (add-to-load-path (string-append #$guile-rsvg + (add-to-load-path (string-append #+guile-rsvg "/share/guile/site/" (effective-version))) - (add-to-load-path (string-append #$guile-cairo + (add-to-load-path (string-append #+guile-cairo "/share/guile/site/" (effective-version))) (use-modules (gnu build svg)) - (svg->png #$svg #$output + (svg->png #+svg #$output #:width #$width #:height #$height))))) |