lilypond-user
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: feature request: semi-automatic vertical spacement


From: Nicolas Sceaux
Subject: Re: feature request: semi-automatic vertical spacement
Date: Fri, 27 Jan 2006 19:29:54 +0100
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (darwin)

Han-Wen Nienhuys <address@hidden> writes:

> can you have a look at current CVS? I had to deviate from the original
> design for naming the tweak files. The current interaction between
> \book, \score \paper etc. was too messy for a sensible automatic
> solution.

I have not really tested the new automatic spacing feature yet, but I
had to make to following change to make it work with guile 1.6:

Index: layout-page-layout.scm
===================================================================
RCS file: /cvsroot/lilypond/lilypond/scm/layout-page-layout.scm,v
retrieving revision 1.13
diff -u -r1.13 layout-page-layout.scm
--- layout-page-layout.scm      26 Jan 2006 15:08:08 -0000      1.13
+++ layout-page-layout.scm      27 Jan 2006 18:23:22 -0000
@@ -95,11 +95,12 @@
       (out-port (open-output-file name)))
       
      (ly:progress "Writing page layout to ~a" name)
-     (hash-for-each
-      (lambda (key val)
+     (hash-fold
+      (lambda (key val nil)
        (format out-port "~a = {" key)
        (dump-tweaks out-port (reverse val) (ly:make-moment 0 1))
         (display "}" out-port))
+       (list)
        tweaks)
      (close-port out-port)
      ))




reply via email to

[Prev in Thread] Current Thread [Next in Thread]