Re: Autochange snippet broken?

[Tim McNamara]

On Jun 2, 2012, at 4:10 PM, Janek Warchoł <address@hidden> wrote:

> On Sat, Jun 2, 2012 at 6:28 AM, David Kastrup <address@hidden> wrote:
>> I actually would write the whole snippet as
>> 
>> autochange =
>> #(define-music-function (parser location ref music) ((ly:pitch?) ly:music?)
>>  (let ((mus (make-autochange-music parser
>>              (if ref #{ \transpose $ref c' $music #} music))))
>>   (set! (ly:music-property mus 'element) music)
>>   mus))
>> 
>> \context PianoStaff <<
>>  \context Staff = "up" {
>>   \autochange a \new Voice << \relative c' {
>>       g4 c e d c r4 a g } >>
>>  }
>>  \context Staff = "down" {
>>   \clef bass
>>   s1*2
>>  }
>>>> 
> 
> Hey, where's my jaw?
> ...oh, it's on the floor.
> 
> The function in the snippet had 61 lines, and you changed it to 6 lines...
> can i say anything else than 8O ?

Maybe we should let that guy hack a few more things on Lilypond.  ;-)