*** empty log message ***

[lilypond.git] / lily / custos-engraver.cc

diff --git a/lily/custos-engraver.cc b/lily/custos-engraver.cc
index 4ece68ae236c87ebfdd75b90c7675d2efbc5f7b1..3a82af9c7bcba5e4688371b64f82f1bfa21bd3cc 100644 (file)
--- a/lily/custos-engraver.cc
+++ b/lily/custos-engraver.cc
@@ -29,8 +29,8 @@ class Custos_engraver : public Engraver
 public:
   TRANSLATOR_DECLARATIONS (Custos_engraver);
   void start_translation_timestep ();
-  DECLARE_ACKNOWLEDGER(bar);
-  DECLARE_ACKNOWLEDGER(note_head);
+  DECLARE_ACKNOWLEDGER (bar);
+  DECLARE_ACKNOWLEDGER (note_head);
   void process_acknowledged ();
   void stop_translation_timestep ();
   virtual void finalize ();
@@ -108,7 +108,7 @@ Custos_engraver::process_acknowledged ()
            p += scm_to_int (c0);
 
          c->set_property ("staff-position",
-                          scm_int2num (p));
+                          scm_from_int (p));
        }
 
       pitches_.clear ();
@@ -136,8 +136,8 @@ Custos_engraver::finalize ()
 }
 
 
-ADD_ACKNOWLEDGER(Custos_engraver,bar);
-ADD_ACKNOWLEDGER(Custos_engraver,note_head);
+ADD_ACKNOWLEDGER (Custos_engraver,bar);
+ADD_ACKNOWLEDGER (Custos_engraver,note_head);
 
 ADD_TRANSLATOR (Custos_engraver,
                /* descr */ "",