]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/tex-slur.cc
release: 0.1.50
[lilypond.git] / lily / tex-slur.cc
index 51af06c23001bd9c5e5e7296b776f5e11ee35827..8fb616fcb747ce0ef6916686b09a0e8d1872ac57 100644 (file)
@@ -160,11 +160,14 @@ Lookup::ps_slur (Real dy , Real dx, Real ht, Real dir) const
     }
 
   String mf = "\\embeddedmf{" + name + "}{\n";
+  mf += "mode_setup;\n";
   mf += "staffsize\\#:=" 
     + String_convert::int_str ((int)paper_l_->get_var ("barsize"), "%d")
     + "pt\\#;\n";
+  mf += "interline#:=staffsize#/4;\n";
+  mf += "stafflinethickness#:=0.1interline#;\n";
   mf += "input feta-sleur;\n";
-  mf += "drawslur(" + dx_str + "," + dy_str + "," + dir_str + ");\n";
+  mf += "slurchar(" + dx_str + "," + dy_str + "," + dir_str + ");\n";
   mf += "end.\n";
   mf += "}\n";