]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/tie.cc
stepmake/aclocal.m4: --srcdir tarball build fix: include <src-dir>/lily/out.
[lilypond.git] / lily / tie.cc
index 955076b6634c1500ef1cc3738aa50f324261d0c5..27033eaeaa1baca379388244104e8dd0cdf2dd92 100644 (file)
@@ -266,22 +266,10 @@ Tie::print (SCM smob)
   Stencil a;
 
   SCM dash_definition = me->get_property ("dash-definition");
-//  SCM p = me->get_property ("dash-period");
-//  SCM f = me->get_property ("dash-fraction");
-//  SCM interval = me->get_property ("dash-interval");
-//  if (scm_is_number (p) && scm_is_number (f))
-//    a = Lookup::dashed_slur (b,
-//                          line_thick,
-//                          robust_scm2double (p, 1.0),
-//                          robust_scm2double (f, 0));
-//  else
-    a = Lookup::slur (b,
-                     get_grob_direction (me) * base_thick,
-                     line_thick,
-                      dash_definition);
-//                      robust_scm2double (p, 1.0),
-//                      robust_scm2double (f, 0),
-//                      robust_scm2double (interval, 1.0));
+  a = Lookup::slur (b,
+                   get_grob_direction (me) * base_thick,
+                   line_thick,
+                    dash_definition);
 
 #if DEBUG_TIE_SCORING
   SCM annotation = me->get_property ("annotation");
@@ -321,8 +309,7 @@ ADD_INTERFACE (Tie,
               "annotation "
               "avoid-slur "    //  UGH.
               "control-points "
-              "dash-fraction "
-              "dash-period "
+               "dash-definition "
               "details "
               "direction "
               "head-direction "