]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/sustain-pedal.cc
remove PDF related files
[lilypond.git] / lily / sustain-pedal.cc
index dee7a88bc3e029701dd49f0dedcc202e73676c79..6b45591de43690ddeb1d4692a591bcc7ffe536b7 100644 (file)
@@ -3,13 +3,12 @@
   
   source file of the GNU LilyPond music typesetter
   
-  (c) 2000--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c) 2000--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   
  */
 #include "grob.hh"
 #include "stencil.hh"
 #include "font-interface.hh"
-#include "string.hh"
 
 // update comment --hwn 
 /*
 
 */
 
+
+/*
+  FIXME. Need to use markup. 
+ */
 struct Sustain_pedal
 {
 public:
@@ -34,7 +37,7 @@ public:
 };
 
 
-MAKE_SCHEME_CALLBACK (Sustain_pedal,print,1);
+MAKE_SCHEME_CALLBACK (Sustain_pedal, print, 1);
 SCM
 Sustain_pedal::print (SCM smob) 
 {
@@ -42,14 +45,14 @@ Sustain_pedal::print (SCM smob)
   
   Stencil mol;
   SCM glyph = e->get_property ("text");
-  if (!gh_string_p (glyph))
+  if (!scm_is_string (glyph))
     return mol.smobbed_copy ();
   
   String text = ly_scm2string (glyph);
 
   for (int i = 0; i < text.length (); i++)
     {
-      String idx ("pedal-");
+      String idx ("pedal.");
       if (text.cut_string (i, 3) == "Ped")
        {
          idx += "Ped";