Unexpected behaviour of script-stencil-hack

2014-10-14 Thread Thomas Morley
Hi folks, consider the following code. \version 2.19.13 %\version 2.16.0 add-to-script = #(define-event-function (parser location mrkp music)(markup? ly:music?) #{ \tweak #'stencil #(lambda (grob) (let ( ;(X-offset (ly:grob-property grob 'X-offset))

Re: Unexpected behaviour of script-stencil-hack

2014-10-14 Thread David Nalesnik
Hi Harm, On Tue, Oct 14, 2014 at 5:38 PM, Thomas Morley thomasmorle...@gmail.com wrote: Hi folks, consider the following code. \version 2.19.13 %\version 2.16.0 add-to-script = #(define-event-function (parser location mrkp music)(markup? ly:music?) #{ \tweak #'stencil

Re: Unexpected behaviour of script-stencil-hack

2014-10-14 Thread Thomas Morley
Hi David, 2014-10-15 0:54 GMT+02:00 David Nalesnik david.nales...@gmail.com: Hi Harm, On Tue, Oct 14, 2014 at 5:38 PM, Thomas Morley thomasmorle...@gmail.com wrote: Hi folks, consider the following code. \version 2.19.13 %\version 2.16.0 add-to-script = #(define-event-function

Re: Unexpected behaviour of script-stencil-hack

2014-10-14 Thread David Nalesnik
Hi Harm, On Tue, Oct 14, 2014 at 6:15 PM, Thomas Morley thomasmorle...@gmail.com wrote: Hi David, 2014-10-15 0:54 GMT+02:00 David Nalesnik david.nales...@gmail.com: Hi Harm, On Tue, Oct 14, 2014 at 5:38 PM, Thomas Morley thomasmorle...@gmail.com wrote: Hi folks, consider the

Re: Unexpected behaviour of script-stencil-hack

2014-10-14 Thread David Nalesnik
On Tue, Oct 14, 2014 at 5:38 PM, Thomas Morley thomasmorle...@gmail.com wrote: Why does this happen? X-offset is _never_ called in the body! But doing this: #(let ((message (display boo!\n))) '()) shows that what you're binding message to is evaluated. --David

Re: Unexpected behaviour of script-stencil-hack

2014-10-14 Thread Thomas Morley
2014-10-15 2:15 GMT+02:00 David Nalesnik david.nales...@gmail.com: On Tue, Oct 14, 2014 at 5:38 PM, Thomas Morley thomasmorle...@gmail.com wrote: Why does this happen? X-offset is _never_ called in the body! But doing this: #(let ((message (display boo!\n))) '()) Ah, great example!