Update guile interface.

[lilypond.git] / lily / span-bar.cc

diff --git a/lily/span-bar.cc b/lily/span-bar.cc
index 4566d73f77080e486530436499324cc48f67b630..bd10b1c671223435cf97786178e7dfe74d4b68cb 100644 (file)
--- a/lily/span-bar.cc
+++ b/lily/span-bar.cc
@@ -185,7 +185,7 @@ Span_bar::calc_glyph_name (SCM smob)
   else if (type == ":|:")
     type = ".|.";
 
-  return scm_makfrom0str (type.c_str ());
+  return ly_string2scm (type);
 }
 
 Interval