diff options
| -rw-r--r-- | data/doc/sisu/CHANGELOG_v7 | 3 | ||||
| -rw-r--r-- | data/sisu/conf/editor-syntax-etc/emacs/sisu-mode.el | 63 |
2 files changed, 65 insertions, 1 deletions
diff --git a/data/doc/sisu/CHANGELOG_v7 b/data/doc/sisu/CHANGELOG_v7 index 00a458e0..520a2cd6 100644 --- a/data/doc/sisu/CHANGELOG_v7 +++ b/data/doc/sisu/CHANGELOG_v7 @@ -25,7 +25,8 @@ Reverse Chronological: * emacs sisu-mode.el & sisu-mode-autoloads.el: * sisu-mode.el, minor update and modify format to reduce diff with FSF - version + version, and match tic style markup blocks ``` + (revisit tic block markup, improperly impmented) * sisu-mode-autoloads.el, added (see elpa 3.0.3 & Kevin Ryde recent post) * sisu_7.1.5.orig.tar.xz (2015-06-02:22/2) 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) |