]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/piano-pedal-engraver.cc
* lily/include/group-interface.hh (extract_grob_array): rename
[lilypond.git] / lily / piano-pedal-engraver.cc
index 5f6b0503e0ea071dfeeb66f3b9c6976fd0dfb0fd..646fd1dd9c10f1b116d71c0718596b94316a0590 100644 (file)
@@ -1,9 +1,9 @@
 /*   
-     piano-pedal-engraver.cc --  implement Piano_pedal_engraver
+     piano-pedal-engraver.cc -- implement Piano_pedal_engraver
   
      source file of the GNU LilyPond music typesetter
   
-     (c) 2000--2004 Jan Nieuwenhuizen <janneke@gnu.org>
+     (c) 2000--2005 Jan Nieuwenhuizen <janneke@gnu.org>
   
      Chris Jackson <chris@fluffhouse.org.uk> - extended to support
      bracketed pedals.
@@ -140,12 +140,12 @@ Piano_pedal_engraver::acknowledge_grob (Grob_info info)
          if (p->line_spanner_)
            {
              Side_position_interface::add_support (p->line_spanner_, info.grob_);
-             add_bound_item (p->line_spanner_,info.grob_);
+             add_bound_item (p->line_spanner_, info.grob_);
            }     
          if (p->bracket_)
-           add_bound_item (p->bracket_,info.grob_);
+           add_bound_item (p->bracket_, info.grob_);
          if (p->finished_bracket_)
-           add_bound_item (p->finished_bracket_,info.grob_);             
+           add_bound_item (p->finished_bracket_, info.grob_);            
        }
     }
 }
@@ -310,7 +310,7 @@ Piano_pedal_engraver::create_bracket_grobs (Pedal_info *p, bool mixed)
 {
   if (!p->bracket_ && p->event_drul_[STOP])
     {
-      String msg =_f ("can't find start of piano pedal bracket: `%s'", p->name_);
+      String msg = _f ("can't find start of piano pedal bracket: `%s'", p->name_);
       p->event_drul_[STOP]->origin ()->warning (msg);
       p->event_drul_[STOP] =  0;
     }
@@ -356,7 +356,7 @@ Piano_pedal_engraver::create_bracket_grobs (Pedal_info *p, bool mixed)
       if (!p->finished_bracket_)
        {
          SCM flare = p->bracket_->get_property ("bracket-flare");
-         p->bracket_->set_property ("bracket-flare", scm_cons (scm_make_real (0),scm_cdr (flare)));
+         p->bracket_->set_property ("bracket-flare", scm_cons (scm_make_real (0), scm_cdr (flare)));
        }
 
 
@@ -538,7 +538,7 @@ Piano_pedal_engraver::typeset_all (Pedal_info * p)
     }
 }
 
-ENTER_DESCRIPTION (Piano_pedal_engraver,
+ADD_TRANSLATOR (Piano_pedal_engraver,
                   /* descr */       "Engrave piano pedal symbols and brackets.",
                   /* creats*/       "SostenutoPedal SustainPedal UnaCordaPedal SostenutoPedalLineSpanner SustainPedalLineSpanner UnaCordaPedalLineSpanner",
                   /* accepts */     "pedal-event",