procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Add icons used by 'mpc.el' to 'x-gtk-stock-map'

Browse source 
* lisp/term/x-win.el (x-gtk-stock-map):
* lisp/term/pgtk-win.el (x-gtk-stock-map): Include tool-bar icons
used by 'mpc.el'.
This commit is contained in:
john muhl 2024-06-19 11:47:42 -05:00 • committed by Stefan Kangas
parent 3fd0b802de
commit 0184acdd31
2 changed files with 16 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/term/pgtk-win.el
View file

@ -251,6 +251,14 @@ EVENT is a `preedit-text' event."
;; No themed versions available:
;; mail/preview (combining stock_mail and stock_zoom)
;; mail/save (combining stock_mail, stock_save and stock_convert)
("images/mpc/prev" . "media-skip-backward")
("images/mpc/rewind" . "media-seek-backward")
("images/mpc/pause" . "media-playback-pause")
("images/mpc/play" . "media-playback-start")
("images/mpc/ffwd" . "media-seek-forward")
("images/mpc/next" . "media-skip-forward")
("images/mpc/stop" . "media-playback-stop")
("images/mpc/add" . "list-add")
)
"How icons for tool bars are mapped to Gtk+ stock items.
Emacs must be compiled with the Gtk+ toolkit for this to have any effect.

8
lisp/term/x-win.el
View file

@ -1440,6 +1440,14 @@ This returns an error if any Emacs frames are X frames."
;; No themed versions available:
;; mail/preview (combining stock_mail and stock_zoom)
;; mail/save (combining stock_mail, stock_save and stock_convert)
("images/mpc/prev" . "media-skip-backward")
("images/mpc/rewind" . "media-seek-backward")
("images/mpc/pause" . "media-playback-pause")
("images/mpc/play" . "media-playback-start")
("images/mpc/ffwd" . "media-seek-forward")
("images/mpc/next" . "media-skip-forward")
("images/mpc/stop" . "media-playback-stop")
("images/mpc/add" . "list-add")
)
"How icons for tool bars are mapped to Gtk+ stock items.
Emacs must be compiled with the Gtk+ toolkit for this to have any effect.