]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/melody-spanner.cc
Issue 5167/6: Changes: show \markup xxx = ... \etc assignments
[lilypond.git] / lily / melody-spanner.cc
index 4fdaa4eb55ac74c1b0e9f5a93305371fc2f6a21b..3550e8938240d13abd1b4f1ff76a0bb2d9f6916e 100644 (file)
@@ -1,7 +1,7 @@
 /*
   This file is part of LilyPond, the GNU music typesetter.
 
-  Copyright (C) 2005--2012 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  Copyright (C) 2005--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
 
 
   LilyPond is free software: you can redistribute it and/or modify
@@ -34,8 +34,8 @@ MAKE_SCHEME_CALLBACK (Melody_spanner, calc_neutral_stem_direction, 1);
 SCM
 Melody_spanner::calc_neutral_stem_direction (SCM smob)
 {
-  Grob *stem = unsmob_grob (smob);
-  Grob *me = unsmob_grob (stem->get_object ("melody-spanner"));
+  Grob *stem = unsmob<Grob> (smob);
+  Grob *me = unsmob<Grob> (stem->get_object ("melody-spanner"));
   if (!me || !me->is_live ())
     return scm_from_int (DOWN);