我想在android emacs 定义org-mode的工具栏,方便触摸屏使用。
现在已经定义了org-mode的工具栏 yuchen/org-mode-tool-bar-map
,在org-mode buffer中手动执行命令 (setq-local tool-bar-map yuchen/org-mode-tool-bar-map)
,功能正常。
现在,我想让每个org-mode buffer 自动把yuchen/org-mode-tool-bar-map作为工具栏。
参考了几个package,大多写在主模式加载的函数里,例如:
(defun compilation-mode (&optional name-of-mode)
(interactive)
(kill-all-local-variables)
(use-local-map compilation-mode-map)
;; Let windows scroll along with the output.
(setq-local window-point-insertion-type t)
(setq-local tool-bar-map compilation-mode-tool-bar-map)
...
因此,我尝试加到 org-mode-hook
:
(add-hook 'org-mode-hook
(lambda ()
(setq-local tool-bar-map yuchen/org-mode-tool-bar-map)))
重启emacs,查看org-mode-hook变量,确实成功添加了。但是org-mode buffer的工具栏没有被设置成功,执行 (local-variable-p 'tool-bar-map)
返回也是 nil。再手动执行命令 (setq-local tool-bar-map yuchen/org-mode-tool-bar-map)
,工具栏才被设置。
想请教一下解决思路。