]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/directional-element-interface.cc
* Documentation/user/notation.itely: fixed 2 typos
[lilypond.git] / lily / directional-element-interface.cc
index e4481d6bcbf6019ad678ea3e8df7d4472bec65b7..b45012c3bec2507e35b11c0015d954d5c5625e49 100644 (file)
@@ -13,7 +13,7 @@
 Direction
 get_grob_direction (Grob*me) 
 {
-  SCM d= me->get_grob_property ("direction");
+  SCM d= me->get_property ("direction");
   if (!is_direction (d))
     return CENTER;
       
@@ -23,6 +23,6 @@ get_grob_direction (Grob*me)
 void
 set_grob_direction (Grob*me, Direction d) 
 {
-  SCM sd = gh_int2scm (d);
-  me->set_grob_property ("direction", sd);
+  SCM sd = scm_int2num (d);
+  me->set_property ("direction", sd);
 }