bug-lilypond
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Problem with emacs mode


From: Milan Zamazal
Subject: Re: Problem with emacs mode
Date: Sun, 12 Feb 2006 16:09:41 +0100
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux)

>>>>> "CH" == Cameron Horsburgh <address@hidden> writes:

    CH> When I use `M-x LilyPond-mode' in GNU Emacs (both 21.4 and 22.0)
    CH> it fails with the following error:

    CH> Loading lilypond-mode (source)...  
    CH> if: Wrong type argument: arrayp, nil

I had to apply the following patch to make LilyPond 2.6.3 and 2.7.32
work with CVS Emacs:

--- lilypond-mode.el.orig       2006-02-12 15:58:09.000000000 +0100
+++ lilypond-mode.el    2006-02-11 20:12:00.000000000 +0100
@@ -393,8 +393,8 @@
   (let ((fnameprefix (if (eq LilyPond-command-current 'LilyPond-command-master)
                         (substring (LilyPond-get-master-file) 0 -3); suppose 
".ly"
                       LilyPond-region-file-prefix))
-       (allcount (string-to-number (substring (count-midi-words) 0 -12)))
-       (count (string-to-number (substring (count-midi-words-backwards) 0 
-12))))
+       (allcount (count-midi-words))
+       (count (count-midi-words-backwards)))
     (concat  fnameprefix
             (if (and (> allcount 1) (> count 0)) ; not first score
                 (if (eq count allcount)          ; last score
@@ -407,7 +407,7 @@
   (let ((fnameprefix (if (eq LilyPond-command-current 'LilyPond-command-master)
                         (substring (LilyPond-get-master-file) 0 -3); suppose 
".ly"
                       LilyPond-region-file-prefix))
-       (allcount (string-to-number (substring (count-midi-words) 0 -12))))
+       (allcount (count-midi-words)))
     (concat (if (> allcount 0)  ; at least one midi-score
                (concat fnameprefix ".midi "))
            (if (> allcount 1)  ; more than one midi-score
Regards,

Milan Zamazal


reply via email to

[Prev in Thread] Current Thread [Next in Thread]