* lily/lily-guile.cc (robust_scm2double): new function. Use throughout.

[lilypond.git] / lily / percent-repeat-item.cc

diff --git a/lily/percent-repeat-item.cc b/lily/percent-repeat-item.cc
index 2dbffcff3593eb0f24a7399d0ec08c1fe63b187c..4c87351d26fae0272cdba8846f9d2bb9f4c718c1 100644 (file)
--- a/lily/percent-repeat-item.cc
+++ b/lily/percent-repeat-item.cc
@@ -19,13 +19,13 @@
 Molecule
 Percent_repeat_item_interface::brew_slash ( Grob *me)
 {
-  Real slope = gh_scm2double (me->get_grob_property ("slope"));
+  Real slope = robust_scm2double (me->get_grob_property ("slope"), 1);
   Real wid = 2.0 / slope;
 
   /*
     todo: check out if in staff-rule thickness normally.
    */
-  Real thick = gh_scm2double (me->get_grob_property ("thickness"));
+  Real thick = robust_scm2double (me->get_grob_property ("thickness"), 1);
   Molecule m = Lookup::repeat_slash (wid, slope, thick);
   m.translate_axis (-m.extent (Y_AXIS).center (), Y_AXIS);
   return m;