我正在尝试定义一个新模式,该模式将从Org模式继承所有内容,称为Web模式。
这是一个初步的业余刺客。
(defvar web-mode-syntax-table
org-mode-syntax-table
"Syntax table used while in `web-mode'.")
;; Create the keymap for this mode.
(defvar web-mode-map
org-mode-map
"Keymap for `web-mode'.")
(setq web-highlights
'(("Sin\\|Cos\\|Sum" . font-lock-function-name-face)
("Pi\\|Infinity" . font-lock-warning-face)))
;; set files ending in .web to open in web mode.
(add-to-list 'auto-mode-alist '("\\.web\\'" . web-mode))
(define-derived-mode web-mode org-mode "web-mode"
"Major mode based on Org-mode"
(kill-all-local-variables)
(setq major-mode 'web-mode)
(setq mode-name "Web Mode")
;; Tell font-lock mode about some things which
;; need to be highlighted.
(setq font-lock-defaults '(web-highlights))
)
但是,当将Web模式加载到文本文件中时,它似乎与纯文本模式相同。关键字Sin,Cos和Sum正确突出显示为蓝色,Pi和Infinity突出显示为粗体红色字体,但是否则似乎没有任何东西继承自Org模式,并且与文本模式没有区别。
这是为什么?