From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Sat, 19 Aug 2006 18:31:38 +0000 (+0000)
Subject: (stop_translation_timestep): don't
X-Git-Tag: cvs/HEAD~161
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=852a05c2e911c2296f3f6936829a342b0f3c1c85;p=lilypond.git

(stop_translation_timestep): don't
crash if spacing_ is nonexistent.
---

diff --git a/lily/spacing-engraver.cc b/lily/spacing-engraver.cc
index d544410227..c35d5fe98b 100644
--- a/lily/spacing-engraver.cc
+++ b/lily/spacing-engraver.cc
@@ -170,10 +170,14 @@ Spacing_engraver::stop_translation_timestep ()
   Paper_column *musical_column
     = dynamic_cast<Paper_column *> (unsmob_grob (get_property ("currentMusicalColumn")));
 
-  musical_column->set_object ("spacing", spacing_->self_scm ());
-  unsmob_grob (get_property ("currentCommandColumn"))
-    ->set_object ("spacing", spacing_->self_scm ());
 
+  if (spacing_)
+    {  
+      musical_column->set_object ("spacing", spacing_->self_scm ());
+      unsmob_grob (get_property ("currentCommandColumn"))
+	->set_object ("spacing", spacing_->self_scm ());
+    }
+  
   SCM proportional = get_property ("proportionalNotationDuration");
   if (unsmob_moment (proportional))
     {