[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Emacs mode bugfix
From: |
Chris Jackson |
Subject: |
Emacs mode bugfix |
Date: |
Tue, 9 Apr 2002 00:41:30 +0100 |
User-agent: |
Mutt/1.3.28i |
This fixes a silly bug in Emacs indentation (open new .ly file,
type \score { <Return> <Tab>, and get an error message)
--
chris
Index: ChangeLog
===================================================================
RCS file: /home/lilypond/lilypond/ChangeLog,v
retrieving revision 1.62
diff -p -u -r1.62 ChangeLog
--- ChangeLog 8 Apr 2002 12:22:25 -0000 1.62
+++ ChangeLog 8 Apr 2002 23:38:05 -0000
@@ -1,3 +1,7 @@
+2002-04-08 Chris Jackson <address@hidden>
+
+ * lilypond-indent.el: Bugfix of indentation of final point in buffer
+
2002-04-08 Han-Wen Nienhuys <address@hidden>
* input/regression/script-stack-order.ly: new file.
Index: lilypond-indent.el
===================================================================
RCS file: /home/lilypond/lilypond/lilypond-indent.el,v
retrieving revision 1.2
diff -p -u -r1.2 lilypond-indent.el
--- lilypond-indent.el 7 Apr 2002 10:55:53 -0000 1.2
+++ lilypond-indent.el 8 Apr 2002 23:38:05 -0000
@@ -331,7 +331,8 @@ slur-paren-p defaults to nil.
(let ( (test-point (point))
(level 0) )
(save-excursion
- (if (or (and (= (char-after (point)) ?\()
+ (if (or (and (/= (point) (point-max))
+ (= (char-after (point)) ?\()
(or (= (char-after (- (point) 1)) ?#)
(and (= (char-after (- (point) 2)) ?#)
(= (char-after (- (point) 1)) ?`))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- Emacs mode bugfix,
Chris Jackson <=