[EMAIL PROTECTED] writes:
> >         ;; ugh. cleanme
> >         (if (equal? "5" (substring cl (- l 1) l))
> >             (if (equal? "1" (substring cl (- l 2) (- l 1)))
> >               (begin
> >                   (if (equal? "^" (substring cl (- l 3) (- l 2)))
> >                       (set! oct -14)
> >                       (set! oct 14))

This looks rather kludgy; I would favor an approach where you can also
do "G^7" "G^6" etc. - The OctavateEight would be changed to a
ClefNumber grob, which has its text property set appropriately.

BTW, we haven't set any CVS branches for development yet, so please do
not commit.

--
Han-Wen Nienhuys   |   [EMAIL PROTECTED]   |   http://www.xs4all.nl/~hanwen 


_______________________________________________
Lilypond-devel mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/lilypond-devel

Reply via email to