* lily/main.cc (setup_guile_env): new function. Set GC min_yields

[lilypond.git] / lily / directional-element-interface.cc

diff --git a/lily/directional-element-interface.cc b/lily/directional-element-interface.cc
index 5ab19596a72016a6788debe62ca8c7d4f9270392..3d7514cad624b7940e73c85f6fdd3fc718169f69 100644 (file)
--- a/lily/directional-element-interface.cc
+++ b/lily/directional-element-interface.cc
@@ -21,6 +21,6 @@ get_grob_direction (Grob *me)
 void
 set_grob_direction (Grob *me, Direction d)
 {
-  SCM sd = scm_int2num (d);
+  SCM sd = scm_from_int (d);
   me->set_property ("direction", sd);
 }