diff options
Diffstat (limited to 'data/sisu/conf/editor-syntax-etc/emacs/sisu-mode.el')
-rw-r--r-- | data/sisu/conf/editor-syntax-etc/emacs/sisu-mode.el | 63 |
1 files changed, 63 insertions, 0 deletions
diff --git a/data/sisu/conf/editor-syntax-etc/emacs/sisu-mode.el b/data/sisu/conf/editor-syntax-etc/emacs/sisu-mode.el index 4d2641e6..03b2ebfa 100644 --- a/data/sisu/conf/editor-syntax-etc/emacs/sisu-mode.el +++ b/data/sisu/conf/editor-syntax-etc/emacs/sisu-mode.el @@ -150,6 +150,69 @@ (cons "^table\{.+\\|^\}table" 'general-font-lock-red2) (cons "^\{table[^}]+\}" 'general-font-lock-red2) + (list + (concat + "^\\(\`\\{3\\}[ ]+code\\)" + "\\([^\`]+\\)" ;not satisfactory how to not match three repeated tics ` and how to specify only this type of tic ` (open single quote) + ;"\\([^\`]\\{3\\}\\)" ; nope + ;"\\([^\`]\\)\\{3\\}" ; ; nope + "\\(\`\\{3\\}\\)$" + ) + '(1 general-font-lock-red2 t) + '(2 nil t) + '(3 general-font-lock-red2 t) + ) + (list + (concat + "^\\(\`\\{3\\}[ ]+group\\)" + "\\([^\`]+\\)" ;not satisfactory how to not match three repeated tics ` and how to specify only this type of tic ` (open single quote) + "\\(\`\\{3\\}\\)$" + ) + '(1 general-font-lock-red2 t) + '(2 nil t) + '(3 general-font-lock-red2 t) + ) + (list + (concat + "^\\(\`\\{3\\}[ ]+block\\)" + "\\([^\`]+\\)" ;not satisfactory how to not match three repeated tics ` and how to specify only this type of tic ` (open single quote) + "\\(\`\\{3\\}\\)$" + ) + '(1 general-font-lock-red2 t) + '(2 nil t) + '(3 general-font-lock-red2 t) + ) + (list + (concat + "^\\(\`\\{3\\}[ ]+poem\\)" + "\\([^\`]+\\)" ;not satisfactory how to not match three repeated tics ` and how to specify only this type of tic ` (open single quote) + "\\(\`\\{3\\}\\)$" + ) + '(1 general-font-lock-red2 t) + '(2 nil t) + '(3 general-font-lock-red2 t) + ) + (list + (concat + "^\\(\`\\{3\\}[ ]+alt\\)" + "\\([^\`]+\\)" ;not satisfactory how to not match three repeated tics ` and how to specify only this type of tic ` (open single quote) + "\\(\`\\{3\\}\\)$" + ) + '(1 general-font-lock-red2 t) + '(2 nil t) + '(3 general-font-lock-red2 t) + ) + (list + (concat + "^\\(\`\\{3\\}[ ]+table\\)" + "\\([^\`]+\\)" ;not satisfactory how to not match three repeated tics ` and how to specify only this type of tic ` (open single quote) + "\\(\`\\{3\\}\\)$" + ) + '(1 general-font-lock-red2 t) + '(2 nil t) + '(3 general-font-lock-red2 t) + ) + ;; footnote/endnote ---- ;(cons "\~\{.+?\}\~" 'general-font-lock-green1) (cons "\~\{\\*\\*\\|\~\{\\*\\|\~\{\\|\}\~" 'general-font-lock-red2) |