]> git.donarmstrong.com Git - lilypond.git/blobdiff - mudela-mode.el
release: 1.1.26
[lilypond.git] / mudela-mode.el
index ed33b674933a6b969bd83dd1230f155e183eafc8..6565db77fdb5334e8b363e6b31c34718ec1926fe 100644 (file)
 ;; 
 
 (defconst mudela-font-lock-keywords
-  (let* ((keywords '(
+  (let* ((keywords '("alternative" "repeat"
                     "accepts" "accidentals" "break" "bar" "cadenza" 
-                    "clef" "cm" "consists" "contains" "duration" "absdynamic" 
-                    "in" "translator" "type" "lyric" "key" "maininput" "notes"
+                    "clef" "cm" "consists" "contains" "duration" 
+                    "absdynamic" "scmfile" "lyrics"
+                    "in" "translator" "type" "key" "maininput" "notes"
                     "musical_pitch" "time" "midi" "mm" "header"
-                    "notenames" "octave" "output" "partial" "paper" "plet"
+                    "notenames" "octave" "output" "partial" "paper" "plet" "name"
                     "property" "pt" "shape" "relative" "include" "score"
                     "scm" "scmfile"
-                    "script" "skip"  "table" "spandynamic" "symboltables"
+                    "script" "skip"  "table" "times" "spandynamic" "symboltables"
                     "tempo" "texid" "textstyle" "transpose" "version" "grouping"
                     ))
        (kwregex (mapconcat (lambda (x) (concat "\\\\" x))  keywords "\\|")))
@@ -98,8 +99,8 @@
   (mapcar (function
           (lambda (x) (modify-syntax-entry
                        (car x) (cdr x) mu-mode-syntax-table)))
-         '(( ?\( . "()" ) ( ?\) . ")(" )
-           ( ?\[ . "(]" ) ( ?\] . ")[" )
+         '(( ?\( . "." ) ( ?\) . "." )
+           ( ?\[ . "." ) ( ?\] . "." )
            ( ?\{ . "(}" ) ( ?\} . "){" )
            ( ?\< . "(>" )( ?\> . ")>") 
            ( ?\$ . "." ) ( ?\% . "." ) ( ?\& . "." )