[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Scheme function problems
From: |
Nicolas Sceaux |
Subject: |
Re: Scheme function problems |
Date: |
Sat, 15 Apr 2006 15:31:26 +0200 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (darwin) |
Kieren Richard MacMillan <address@hidden> writes:
> Hi, Jan:
>
> Thanks! Your code works great...
>
> One more question -- I want to compensate, but neither
>
> \once \override Score.BarLine #'space-alist =
> #`((first-note extra-space . ,$padding) (right-edge extra-
> space . -,$padding))
this is internally changed to:
#`((first-note extra-space . ,lilyvartmpa)
(right-edge extra-space . -,$padding))
-,$padding is just a strange symbol name.
> nor
>
> \once \override Score.BarLine #'space-alist =
> #`((first-note extra-space . ,$padding) (right-edge extra-
> space . (* -1 ,$padding ) ))
This is changed to:
#`((first-note extra-space . ,lilyvartmpa)
(right-edge extra-space . (* -1 ,lilyvartmpa)))
which value would be (with 3.0 padding):
((first-note extra-space . 3.0)
(right-edge extra-space . (* -1 3.0)))
That is, the right edge extra space value is not a number, but a list,
containing the procedure * and the numbers -1 and 3.0.
Use:
#`((first-note extra-space . ,$padding)
(right-edge extra-space . ,(* -1 $padding)))
or
#`((first-note extra-space . ,$padding)
(right-edge extra-space . ,(- $padding)))