emacs: add agw-lithsnd-mode
parent
809e3e0af8
commit
e37851ff81
|
@ -81,4 +81,20 @@
|
||||||
|
|
||||||
(provide 'agw-lithdlg-mode)
|
(provide 'agw-lithdlg-mode)
|
||||||
|
|
||||||
|
;; Lithium sound definition mode
|
||||||
|
(setq agw-lithsnd-highlights '(("\\$[a-z]+\\|==" . font-lock-keyword-face)))
|
||||||
|
|
||||||
|
(setq agw-lithsnd-syntax
|
||||||
|
(let ((table (make-syntax-table)))
|
||||||
|
(modify-syntax-entry ?# "<" table)
|
||||||
|
(modify-syntax-entry ?\n ">" table)
|
||||||
|
table))
|
||||||
|
|
||||||
|
(define-derived-mode agw-lithsnd-mode prog-mode "lithsnd"
|
||||||
|
"Major mode for Lithium sound definitions."
|
||||||
|
(setq font-lock-defaults '(agw-lithsnd-highlights))
|
||||||
|
(set-syntax-table agw-lithsnd-syntax))
|
||||||
|
|
||||||
|
(provide 'agw-lithsnd-mode)
|
||||||
|
|
||||||
;; EOF
|
;; EOF
|
||||||
|
|
Loading…
Reference in New Issue