emacs: add agw-lithsnd-mode

master
an 2020-03-20 23:24:28 -04:00
parent 809e3e0af8
commit e37851ff81
1 changed files with 16 additions and 0 deletions

View File

@ -81,4 +81,20 @@
(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