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

[lilypond.git] / lily / tie.cc

diff --git a/lily/tie.cc b/lily/tie.cc
index 846acaa28fe1f3331d9b20766d3a77c7f488f803..85d838f02d19a5684e512b519df66a0051d52866 100644 (file)
--- a/lily/tie.cc
+++ b/lily/tie.cc
@@ -130,7 +130,7 @@ Tie::get_control_points (SCM smob)
   
   Real staff_space = Staff_symbol_referencer::staff_space (me);
 
-  Real x_gap_f = gh_scm2double (me->get_grob_property ("x-gap"));
+  Real x_gap_f = robust_scm2double (me->get_grob_property ("x-gap"), 0);
 
   Grob* l = me->get_bound (LEFT);
   Grob* r = me->get_bound (RIGHT);