]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/volta-bracket.cc
* lily/lily-guile.cc (robust_scm2double): new function. Use throughout.
[lilypond.git] / lily / volta-bracket.cc
index 740054f775599ca51e4a048c00da99a92fb49231..bf2205f46fea08f9c60e669aed798e9f8c1c6390 100644 (file)
@@ -89,7 +89,7 @@ Volta_bracket_interface::brew_molecule (SCM smob)
     }
 
   Real w = dynamic_cast<Spanner*> (me)->spanner_length () - left - half_space;
-  Real h =  gh_scm2double (me->get_grob_property ("height"));
+  Real h =  robust_scm2double (me->get_grob_property ("height"), 1);
 
   Molecule start,end ;
   if (!no_vertical_start)