From 8bc4c4697c642d959aa319537bdbc0a590918d78 Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Mon, 16 Dec 2019 07:56:14 +0100 Subject: Adjust to changes in Adwaita icon theme. --- guile-studio-configure.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/guile-studio-configure.scm b/guile-studio-configure.scm index 57f7e18..ec7ff45 100644 --- a/guile-studio-configure.scm +++ b/guile-studio-configure.scm @@ -299,7 +299,7 @@ d=\"M400 224h-24v-72C376 68.2 307.8 0 224 0S72 68.2 72 \ '(menu-item " Insert image" geiser--guile-picture-language--pict-from-file :image (image :type png - :file ,(string-append icons "/24x24/actions/insert-image.png")) + :file ,(string-append icons "/24x24/legacy/insert-image.png")) :help "Insert image...")) (defvar scheme-tool-bar-map (make-sparse-keymap)) @@ -307,13 +307,13 @@ d=\"M400 224h-24v-72C376 68.2 307.8 0 224 0S72 68.2 72 \ '(menu-item " Evaluate" geiser-eval-buffer :image (image :type png - :file ,(string-append icons "/24x24/actions/media-playback-start.png")) + :file ,(string-append icons "/24x24/legacy/media-playback-start.png")) :help "Evaluate buffer...")) (define-key scheme-tool-bar-map (vector 'lookup-documentation) '(menu-item " Documentation" geiser-doc-symbol-at-point :image (image :type png - :file ,(string-append icons "/24x24/actions/help-faq.png")) + :file ,(string-append icons "/24x24/legacy/help-faq.png")) :help "Show documentation for the current symbol")) (add-hook 'emacs-startup-hook -- cgit v1.2.3