ly:book-set-header!

[Jan-Peter Voigt]

Hello list,

sorry for resending this, it might get lost, because I simply answered 
to another thread with another subject.

now, we have a book-predicate and we are dealing with books in scheme. 
Then we might want to set a header after creating a book.
There is a function ly:score-set-header!, which I copied and adapted for 
the Book-class.
This patch compiled and works with the following snippet.

--snip--
\version "2.15.32"

bk = \book {
  \score {
    \relative c' {
      c4 e g b
    }
  }
}

#(let ((bh (eval-string "(define-module (a b))")))
     (eval '(define title "Hallo") bh)
     (ly:book-set-header! bk bh))

\book { \bk }
--snip--

Is this helpful for lily-devel?
And is there another (better) way of creating a module (for header 
generation) on the fly in scheme?

Cheers,
Jan-Peter

0001-add-ly-book-set-header.patch
Description: Text Data