X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fmusic.cc;h=81f4a3d67f18e43b0ffb6038c38ea6c5a3556e33;hb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;hp=c19c56a1ae660021bc76f710ed37756ee1af8042;hpb=2558bbf111c416f0c7093f7f8a3129533310cf37;p=lilypond.git diff --git a/lily/music.cc b/lily/music.cc index c19c56a1ae..81f4a3d67f 100644 --- a/lily/music.cc +++ b/lily/music.cc @@ -1,7 +1,7 @@ /* This file is part of LilyPond, the GNU music typesetter. - Copyright (C) 1997--2014 Han-Wen Nienhuys + Copyright (C) 1997--2015 Han-Wen Nienhuys LilyPond is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -90,7 +90,7 @@ Moment Music::get_length () const { SCM lst = get_property ("length"); - if (Moment::unsmob (lst)) + if (Moment::is_smob (lst)) return *Moment::unsmob (lst); if (ly_is_procedure (length_callback_))