]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/note-heads-engraver.cc
* lily/note-heads-engraver.cc (process_music): use robust_scm2int
[lilypond.git] / lily / note-heads-engraver.cc
index 2927d4dc54c5de6341d1c4b9c08c81c05c5a935d..bd8b1c8a86810d6223bfb2750561d4fbc2ebfd0b 100644 (file)
@@ -76,7 +76,7 @@ Note_heads_engraver::process_music ()
          Rhythmic_head::set_dots (note, d);
          
          if (dur.dot_count ()
-             != gh_scm2int (d->get_grob_property ("dot-count")))
+             != robust_scm2int (d->get_grob_property ("dot-count"), 0))
            d->set_grob_property ("dot-count", gh_int2scm (dur.dot_count ()));
 
          d->set_parent (note, Y_AXIS);