* scm/output-lib.scm (shift-right-at-line-begin): new function:

[lilypond.git] / lily / output-property-music-iterator.cc

diff --git a/lily/output-property-music-iterator.cc b/lily/output-property-music-iterator.cc
index 5759b85b42874f2d39620bb0059cf259fdc34a32..e1cd1618a6d804b48ff89031560d8d5ab4590427 100644 (file)
--- a/lily/output-property-music-iterator.cc
+++ b/lily/output-property-music-iterator.cc
@@ -3,22 +3,29 @@
   
   source file of the GNU LilyPond music typesetter
   
-  (c) 2000--2001 Jan Nieuwenhuizen <janneke@gnu.org>
+  (c) 2000--2003 Jan Nieuwenhuizen <janneke@gnu.org>
  */
 
 #include "input.hh"
 #include "music-list.hh"
 #include "output-property-music-iterator.hh"
 
+
+/*
+  Huh.
+
+  Why do we need this?
+  
+ */
 void
 Output_property_music_iterator::process (Moment m)
 {
   if (last_processed_mom_ < Moment (0))
     {
-      bool accepted = try_music (music_l_);
+      bool accepted = try_music (get_music ());
       if (!accepted)
-       music_l_->origin ()->warning (_f ("Junking request: `%s'",
-                                         classname (music_l_)));
+       get_music ()->origin ()->warning (_f ("Junking event: `%s'",
+                                         classname (get_music ())));
     }
 
   skip (m);