* scm/grob-description.scm (all-grob-descriptions): set

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

diff --git a/lily/a2-engraver.cc b/lily/a2-engraver.cc
index ec3ecf9161f98607f23011340a8a6520fe7f42ef..ac7177ba91cdddc3759853c564185ff00cf5dda4 100644 (file)
--- a/lily/a2-engraver.cc
+++ b/lily/a2-engraver.cc
@@ -174,7 +174,7 @@ A2_engraver::acknowledge_grob (Grob_info i)
        {
        
          /* Blunt axe method: every grob gets a propertysetting. */
-         i.grob_->set_grob_property ("direction", gh_int2scm (d));
+         i.grob_->set_grob_property ("direction", scm_int2num (d));
        }
     }
 
@@ -184,7 +184,7 @@ A2_engraver::acknowledge_grob (Grob_info i)
     if (state_ == UNIRHYTHM
        && unisilence != SCM_BOOL_T)
     {
-      i.grob_->set_grob_property ("staff-position", gh_int2scm (d * 6));
+      i.grob_->set_grob_property ("staff-position", scm_int2num (d * 6));
     }
 }