]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/sustain-pedal.cc
* flower
[lilypond.git] / lily / sustain-pedal.cc
index 6806ce2c9df07abdbb8e3041f14e41a6e560e9a0..68db12e7608318e0585b7350438a8f245532ef4f 100644 (file)
@@ -1,11 +1,10 @@
-/*   
+/*
   sustain-pedal.cc -- implement Sustain_pedal
-  
+
   source file of the GNU LilyPond music typesetter
-  
+
   (c) 2000--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-  
- */
+*/
 #include "grob.hh"
 #include "stencil.hh"
 #include "font-interface.hh"
   Urg.
   This is almost text
   Problem is:
-    * we have no kerning
-    * symbols are at wrong place in font
+  * we have no kerning
+  * symbols are at wrong place in font
 
 
 
   Properties:
 
   glyph -- text string (TODO: make one large glyph of the Ped symbol, removes need for member_print ())
-
 */
 
-
 /*
-  FIXME. Need to use markup. 
- */
+  FIXME. Need to use markup.
+*/
 struct Sustain_pedal
 {
 public:
   DECLARE_SCHEME_CALLBACK (print, (SCM));
 };
 
-
 MAKE_SCHEME_CALLBACK (Sustain_pedal, print, 1);
 SCM
-Sustain_pedal::print (SCM smob) 
+Sustain_pedal::print (SCM smob)
 {
-  Grob * e = unsmob_grob (smob);
-  
+  Grob *e = unsmob_grob (smob);
+
   Stencil mol;
   SCM glyph = e->get_property ("text");
   if (!scm_is_string (glyph))
     return mol.smobbed_copy ();
-  
+
   String text = ly_scm2string (glyph);
 
   for (int i = 0; i < text.length (); i++)
@@ -64,7 +60,7 @@ Sustain_pedal::print (SCM smob)
       if (!m.is_empty ())
        mol.add_at_edge (X_AXIS, RIGHT, m, 0, 0);
     }
-    
+
   return mol.smobbed_copy ();
 }