Issue 5148/2: three-sided-box snippet: use #:properties keyword

[lilypond.git] / input / regression / spacing-loose-grace-error.ly

diff --git a/input/regression/spacing-loose-grace-error.ly b/input/regression/spacing-loose-grace-error.ly
index 470754f0597ea23ae56c2f9fb1f438058f347a6b..6f299e8cb33db02c07305150c12e219a6d2cea7f 100644 (file)
--- a/input/regression/spacing-loose-grace-error.ly
+++ b/input/regression/spacing-loose-grace-error.ly
@@ -1,19 +1,30 @@
-\header
-{
-  
+\version "2.17.6"
+
+#(ly:expect-warning (_ "Cannot determine neighbors for floating column. "))
+#(ly:expect-warning (_ "Loose column does not have right side to attach to."))
+#(ly:expect-warning (_ "Loose column does not have right side to attach to."))
+
+\header {
+
 texidoc = "Even in case of incorrect contexts (eg. shortlived
   contexts) that break linking of columns through spacing wishes,
-  @code{strict-note-spacing} defaults to a robust solution."
+  @code{strict-note-spacing} defaults to a robust solution.
+  This test passes if it does not seg fault; instead it should
+  produce three programming error messages.  Note that, in tight
+  music with strict note spacing, grace notes will collide with
+  normal notes.  This is expected."
 
 }
 
-\version "2.12.0"
-
-
 %% \new Staff cause shortlived, disconnected Voice contexts
 %% breaking spacing-wishes links.
-\new Staff {
-  \override Score.SpacingSpanner #'strict-note-spacing = ##t
-  \afterGrace c'4 {c'32 c'32 }
-  c'4
+\score {
+  \new Staff {
+    \override Score.SpacingSpanner.strict-note-spacing = ##t
+    \afterGrace c'4 {c'32 c'32 }
+    c'4
+  }
+  \layout {
+    ragged-right = ##f
+  }
 }