* lily/unfolded-repeat-iterator.cc (process): bugfix: use a

[lilypond.git] / lilypond-indent.el

diff --git a/lilypond-indent.el b/lilypond-indent.el
index 7aa2e72e76f72c331f695580d1f25e631c0de668..50db7bb3433585674d7e03ccc634e190cec71613 100644 (file)
--- a/lilypond-indent.el
+++ b/lilypond-indent.el
@@ -574,8 +574,12 @@ in XEmacs' paren-highlight."
 ;;; From Emacs' paren.el, with minimal changes (see "LilyPond"-lines)
 ;; Find the place to show, if there is one,
 ;; and show it until input arrives.
-(defun show-paren-function ()
-;;(defun LilyPond-show-paren-function () ; make show-paren-function local ??
+; (defun show-paren-function ()
+
+
+;;  don't redefine emacs functions. It breaks other modes.
+
+(defun LilyPond-show-paren-function () ; make show-paren-function local ??
   (if show-paren-mode
       (let (pos dir mismatch face (oldpos (point)))
        (cond ((eq (char-syntax (preceding-char)) ?\))
@@ -682,8 +686,8 @@ in XEmacs' paren-highlight."
 ;; and show it until input arrives.
 (if (string-match "XEmacs\\|Lucid" emacs-version)
     (paren-set-mode 'paren)) ; works if this is set here (, right place?)
-(defun paren-highlight ()
-;;(defun LilyPond-paren-highlight () ; make paren-highlight local ??
+;(defun paren-highlight ()
+(defun LilyPond-paren-highlight () ; make paren-highlight local ??
   "This highlights matching parentheses.
 
 See the variables: