Emacsの道具バーにボタンを足すコード。ここでは前のバッファーに戻る previous-buffer を割りあてて、undo のアイコンを使っている。
(let ((tool-bar-map (default-value 'tool-bar-map))) (tool-bar-add-item "undo" 'previous-buffer '前の :help "前のバッファーに戻る"))
Are you sure to delete this paste? (You can not revert deletion.)