*** empty log message ***

[lilypond.git] / lily / note-head.cc

diff --git a/lily/note-head.cc b/lily/note-head.cc
index b84e74690dd71a847f22aeaad9d20a3ad42fd047..ef982c9925e66ef116ee547220c5a92c19607750 100644 (file)
--- a/lily/note-head.cc
+++ b/lily/note-head.cc
@@ -143,7 +143,7 @@ int
 Note_head::get_balltype (Grob *me)
 {
   SCM s = me->get_property ("duration-log");
-  return scm_is_number (s) ? min (scm_to_int (s), 2) : 0;
+  return scm_is_number (s) ? min (int (scm_to_int (s)), 2) : 0;
 }
 
 ADD_INTERFACE (Note_head, "note-head-interface",