Issue 4377: Run a script for using derived_unsmob where obvious

[lilypond.git] / lily / spacing-engraver.cc

diff --git a/lily/spacing-engraver.cc b/lily/spacing-engraver.cc
index 42fb3d9bf26b7c7ab91199f65c647d2d1c9d47b8..a8e21253e6ec6667af647a213069ce30e1a45ff3 100644 (file)
--- a/lily/spacing-engraver.cc
+++ b/lily/spacing-engraver.cc
@@ -194,7 +194,7 @@ void
 Spacing_engraver::stop_translation_timestep ()
 {
   Paper_column *musical_column
-    = dynamic_cast<Paper_column *> (Grob::unsmob (get_property ("currentMusicalColumn")));
+    = derived_unsmob<Paper_column> (get_property ("currentMusicalColumn"));
 
   if (!spacing_)
     start_spanner ();