]> git.donarmstrong.com Git - lilypond.git/blobdiff - elisp/lilypond-indent.el
Doc: Usage 1.2 - Added note about using wildcards
[lilypond.git] / elisp / lilypond-indent.el
index fd9ce60dabd955a485145082906c386a426161fb..bc04ed5a387dba3db8fb44c9d11f6aa3718db04c 100644 (file)
@@ -68,7 +68,7 @@ Compares with other text in same context."
   :group 'LilyPond
   :type 'boolean)
 
-(defcustom LilyPond-comment-region "%%$"
+(defcustom LilyPond-comment-region "%%%"
   "*String inserted by \\[LilyPond-comment-region]\
  at start of each line in region."
   :group 'LilyPond
@@ -383,7 +383,7 @@ slur-paren-p defaults to nil.
     ;; match concurrent one-char opening and closing slurs
     (if (and (eq dir 1)
             (not (sequencep bracket-type))
-            (eq (char-syntax (char-after oldpos)) ?\()
+            (eq (char-syntax (or (char-after oldpos) 0)) ?\()
             (not (eq (char-after oldpos) ?<)))
        ;; anyway do not count open slur, since already level = -1
         (progn (forward-char 1)