input/regression/between-systems.ly

   1
   2 \version "2.1.26"
   3
   4 \header{
   5 texidoc="
   6 By inserting @TeX{} commands between systems, you can force pagebreaks.
   7
   8 In reality, you'd use the LateX command @code{\\newpage} instead of (pagebreak)
   9 of course.
  10 "
  11 }
  12
  13
  14 #(define (set-page-break grob grob-c context)
  15   (let*
  16    ((meta (ly:grob-property grob 'meta))
  17     (name (cdr (assoc 'name meta))))
  18
  19    (if (equal? 'NonMusicalPaperColumn name)
  20     (ly:grob-set-property! grob 'between-system-string "(pagebreak)\n\n"))
  21 ))
  22
  23 \score {
  24     \notes \relative c' {
  25         c1
  26         \context Score \applyoutput #set-page-break
  27         \break
  28
  29         c1
  30     }
  31 }
  32