diff options
author | Ralph Amissah <ralph@amissah.com> | 2015-12-14 17:24:05 -0500 |
---|---|---|
committer | Ralph Amissah <ralph@amissah.com> | 2015-12-14 17:57:39 -0500 |
commit | 9664f4d70025b54adf8ba45fce6358f066f1444f (patch) | |
tree | 542056fad6453c49f6011de36dbb0cf00de6b7de /data/sisu/conf | |
parent | emacs sisu-mode.el & sisu-mode-autoloads.el (diff) |
emacs sisu-mode.el match tic style markup blocks ``` (revisit required)
Diffstat (limited to 'data/sisu/conf')
-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) |