From e37851ff81749c70594f95d4331bb564059bbe57 Mon Sep 17 00:00:00 2001 From: Alison Watson Date: Fri, 20 Mar 2020 23:24:28 -0400 Subject: [PATCH] emacs: add agw-lithsnd-mode --- emacs/data.el | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) diff --git a/emacs/data.el b/emacs/data.el index 3926dc0..1396c21 100644 --- a/emacs/data.el +++ b/emacs/data.el @@ -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