* lily/accidental.cc (print): Change font-relative-size ->

	font-size. Fixes cautionary-style = smaller.

diff --git a/ChangeLog b/ChangeLog
index d8aedc4d71eebe1f7d42fd04ede8b7965760eb18..fb36ef47d0eae675e91132d5565e2ee49bd1c94a 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2004-02-20  Mats Bengtsson  <mabe@drongo.s3.kth.se>
+
+       * lily/accidental.cc (print): Change font-relative-size ->
+       font-size. Fixes cautionary-style = smaller.
+
 2004-02-20  Han-Wen Nienhuys   <hanwen@xs4all.nl>
 
        * lily/parser.yy (music_property_def): oops. SCM_UNDEFINED

diff --git a/lily/accidental.cc b/lily/accidental.cc
index 8c27bd2b2ee541dd96c0e1e56515327e68f3cd8c..427200dd9fc45b914fccde45c1cc1070b949b6e5 100644 (file)
--- a/lily/accidental.cc
+++ b/lily/accidental.cc
@@ -193,8 +193,8 @@ Accidental_interface::print (SCM smob)
     {
       SCM ac = Font_interface::font_alist_chain (me);
       ac = gh_cons (gh_cons (gh_cons
-                            (ly_symbol2scm ("font-relative-size"),
-                             scm_int2num (-1)), SCM_EOL),
+                            (ly_symbol2scm ("font-size"),
+                             scm_int2num (-2)), SCM_EOL),
                    ac);
       fm = select_font (me->get_paper (), ac);
     }