>>>>> "Laurent" == Laurent Martelli <[EMAIL PROTECTED]> writes:

>>>>> "Laurent" == Laurent Martelli <[EMAIL PROTECTED]> writes:

>>>>> "Rune" == Rune Zedeler <[EMAIL PROTECTED]> writes:

  Rune> But this is not so neat.  Isn't it possible to define some
  Rune> short of shortcut for this, somehow?  Lilypond functions... :)

  Laurent> And it does not work as expected (at least not for me) for
  Laurent> keys other than C major. But I'm working on it.

  Laurent> That should work.

        [...]

One last little improvement, to save even more key presses :

#(define (my-shift-music delta)
   (eval `(lambda (x) (shift-music x ,delta key))))

#(define key c-major)
\apply #(my-shift-music 2) \patterna

#(define key g-major)
\apply #(my-shift-music 2) \patternb

-- 
Laurent Martelli
[EMAIL PROTECTED]              http://www.linuxfan.com/~laurent


_______________________________________________
Gnu-music-discuss mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/gnu-music-discuss

Reply via email to