/* ugh. */
if (bpd->c_variable ("is-paper") == SCM_BOOL_T)
{
- Real scale = scm_to_double (bpd->c_variable ("outputscale"));
+ Real scale = scm_to_double (bpd->c_variable ("output-scale"));
Output_def *def = scale_output_def (unsmob_output_def (outdef), scale);
Output_def *bdef = scale_output_def (bpd, scale);
if (ly_is_module (header))
paper_book->add_score (header);
- SCM systems = pscore->get_paper_systems ();
- paper_book->add_score (systems);
-
+ paper_book->add_score (pscore->self_scm ());
paper_book->classic_output (outname);
paper_book->unprotect ();
}
Real scale = 1.0;
if (layoutbook && layoutbook->c_variable ("is-paper") == SCM_BOOL_T)
- scale = scm_to_double (layoutbook->c_variable ("outputscale"));
+ scale = scm_to_double (layoutbook->c_variable ("output-scale"));
SCM outputs = SCM_EOL;
SCM *tail = &outputs;