diff options
author | Han-Wen Nienhuys <hanwen@xs4all.nl> | 2004-04-03 11:43:06 +0000 |
---|---|---|
committer | Han-Wen Nienhuys <hanwen@xs4all.nl> | 2004-04-03 11:43:06 +0000 |
commit | 5547ff00446ba0ac2bdbd1fe3205c2fb8411bb2f (patch) | |
tree | cf9e8cad21bd1fe2e2ccbf58d9c4cb1a9e496ad6 /lily/ambitus.cc | |
parent | 066b7776b37ef648faff2b04e03c4b8b59236731 (diff) |
* scm/output-tex.scm (font-command): use ly: functions to
construct name.
(define-fonts): don't use alist, just dump \font definitions.
(font-load-command): calculate proper scaling by taking
outputscale from paper argument.
* lily/stencil-scheme.cc (fontify_atom): insert Font_metric into
expression.
* lily/paper-outputter.cc (output_header): pass paper arg to
define-fonts
* lily/paper-def.cc (font_descriptions): dump list of
Scaled_font_metrics
(find_scaled_font): take Font_metric argument, store
Scaled_font_metrics in hash-table containing (size ->
Scaled_font_metrics) alist.
(get_dimension): rename from get_realvar
* lily/font-metric.cc (LY_DEFINE): ly:font-design-size,
ly:font-magnification, ly:font-name: new functions
Diffstat (limited to 'lily/ambitus.cc')
-rw-r--r-- | lily/ambitus.cc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lily/ambitus.cc b/lily/ambitus.cc index 9e5b145557..d2224744ac 100644 --- a/lily/ambitus.cc +++ b/lily/ambitus.cc @@ -213,8 +213,8 @@ Ambitus::print (SCM smob) if (to_boolean (me->get_property ("join-heads")) && ((p_max - p_min) >= 3)) { - Real linethickness = me->get_paper ()->get_realvar (ly_symbol2scm ("linethickness")); - Real blotdiameter = me->get_paper ()->get_realvar (ly_symbol2scm ("blotdiameter")); + Real linethickness = me->get_paper ()->get_dimension (ly_symbol2scm ("linethickness")); + Real blotdiameter = me->get_paper ()->get_dimension (ly_symbol2scm ("blotdiameter")); Interval x_extent = 0.5 * Interval (-linethickness, +linethickness); Interval y_extent = 0.5 * Interval (p_min + 1.35, p_max - 1.35); Box line_box (x_extent, y_extent); |