Re: Re : contribute paper.scm

[Valentin Villenave]

2008/5/31  <address@hidden>:

> Here you are :-)

Sorry, I should have checked the patch before sending it.

I'm not sure why the following has been modified:

 (define-safe-public (set-global-staff-size sz)
   "Set the default staff size, where SZ is thought to be in PT."
   (let* ((current-mod (current-module))
-        (parser (eval 'parser current-mod))
-        (pap (ly:parser-lookup parser '$defaultpaper))
+        (pap (eval '$defaultpaper current-mod))
         (in-layout? (or (module-defined? current-mod 'is-paper)
                         (module-defined? current-mod 'is-layout)))


Anyway, here's a cleaner patch.

Cheers,
Valentin

0001-Implementation-of-paper-sizes.patch
Description: Binary data