From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Sat, 24 Feb 2007 23:54:36 +0000 (+0100)
Subject: Merge branch 'master' of ssh+git://hanwen@git.sv.gnu.org/srv/git/lilypond
X-Git-Tag: release/2.11.20-1~2
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=9f114c6402fb7cf9c9bf0ea97ee7c16291c48193;hp=fef6e25ff53688becd9c7c75f04f1c89acb42339;p=lilypond.git

Merge branch 'master' of ssh+git://hanwen@git.sv.gnu.org/srv/git/lilypond
---

diff --git a/input/regression/cluster-single-note.ly b/input/regression/cluster-single-note.ly
new file mode 100644
index 0000000000..5b66a79eed
--- /dev/null
+++ b/input/regression/cluster-single-note.ly
@@ -0,0 +1,8 @@
+\header
+{
+  texidoc = "don't crash on single chord clusters."
+}
+
+
+\version "2.11.19"
+\relative c' { \makeClusters <e d'> } 
diff --git a/lily/cluster-engraver.cc b/lily/cluster-engraver.cc
index e5ed481f6a..898846e2d8 100644
--- a/lily/cluster-engraver.cc
+++ b/lily/cluster-engraver.cc
@@ -55,7 +55,17 @@ Cluster_spanner_engraver::finalize ()
 void
 Cluster_spanner_engraver::typeset_grobs ()
 {
-  finished_spanner_ = 0;
+  if (finished_spanner_)
+    {
+      if (!finished_spanner_->get_bound (RIGHT))
+	{
+	  finished_spanner_->set_bound (RIGHT,
+					finished_spanner_->get_bound (LEFT));
+					
+	}
+      
+      finished_spanner_ = 0;
+    }
   beacon_ = 0;
 }