emacs에 툴바 버튼을 추가하는 방법은 무엇입니까?

Question

도구 모음에 단추를 추가하려고했지만 작동하지 않습니다. 어떻게하는지, 나는 이맥스 위키에서 확인하고 찾을 수 없다. 나는 emacs를 사용했다. 24.3.1. 도구 모음이 표시되지만 새 항목은 표시되지 않습니다.

---

내가 평가-버퍼를 실행하지만 내 이맥스 또는 그 해결을위한 다른 해결책을 찾을 수 있습니다. eval-buffer와 함께 추가 할 때 내 버튼이 스크롤 한 후 툴바를 떠납니다.

(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") 
    ) 
) 

Answer 1

안녕 난 도구 모음 단추를 추가 "주문"하는 간단한 해결책을 찾았는/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") 

Answer 2

코드는 작동하지만 도구 모음이 활성화 된 후에 실행해야합니다.

이처럼 이맥스에 코드를 추가하는 경우

이 문제가 사라해야합니다

(add-hook 'after-init-hook 
      (lambda() 
      (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") 
         ))))