如何在emacs中添加工具栏按钮?
问题描述:
我尝试在工具栏中添加一个按钮,但不起作用。
如何做,我检查Emacs维基,我什么也找不到。
我用emacs 24.3.1。
显示工具栏,但不显示我的新项目。
I try to add a button in the tool-bar but that doesn't works. how to do that, i check in Emacs wiki and i find nothing. I used emacs 24.3.1. The toolsbar are displayed but not my new item.
我可以使用eval-buffer运行它与我的.emacs或找到另一个解决方案来解决。
当我用eval-buffer添加它时,我的按钮在滚动后离开工具栏。
I can run it with eval-buffer but not with my .emacs or find another solution to resolve that. When i add it with eval-buffer my button leave my toolbar after a scroll.
(defun omar-hotel ()
"another nonce menu function"
(interactive)
(message "hotel, motel, holiday inn"))
(define-key global-map [tool-bar omar-button]
'(menu-item "Hotel" omar-hotel
:image (image :type xpm :file "/usr/share/emacs/24.3/etc/images/jump-to.xpm")
)
)
答
我发现一个简单的解决方案来添加一个工具栏按钮spell是/usr/share/emacs/23.4/etc/images /
Hi i found a simple solution to add a toolbar button "spell" is the image in /usr/share/emacs/23.4/etc/images/
(defun omar-hotel ()
"another nonce menu function"
(interactive)
(message "hotel, motel, holiday inn"))
(tool-bar-add-item "spell" 'omar-hotel
'omar-hotel
:help "Run fonction omar-hotel")