X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fbeam-extreme.ly;h=61462dd7b846773ebdf368a03bf21d78277e2562;hb=ea21cfa09e83d27b197e3ce6d86da16953fbb593;hp=8fa8d4a2d4bb1253ebcef58ed32162d0737852c5;hpb=0713e9256dc1f35299ce716cf29ddeab4ebca93b;p=lilypond.git

diff --git a/input/regression/beam-extreme.ly b/input/regression/beam-extreme.ly
index 8fa8d4a2d4..61462dd7b8 100644
--- a/input/regression/beam-extreme.ly
+++ b/input/regression/beam-extreme.ly
@@ -1,25 +1,40 @@
+
+\version "2.12.0"
 \header{
 texidoc="
 Beams should behave reasonably well, even under extreme circumstances.
-Stems may be short, but noteheads should never touch the beam.
-";
+Stems may be short, but noteheads should never touch the beam.  Note that
+under normal circumstances, these beams would get knees.  Here
+@code{Beam.auto-knee-gap} was set to false.
+"
+}
+
+\layout{
+  %%    ragged-right = ##t
+  ragged-right = ##t
+}
+
+extreme = \relative c'' {
+  \stemNeutral
+   g8[ c c,]
+   c16[ c'' a f]
+  \stemUp 
+   c,,32[ c'' a f]
+
+  %%%%%%%
+  \stemNeutral
+  \times 2/3{ d16[ fis' d,]} \times 2/3{ cis[ g'' cis,,]}
+  a'16 cis a, g''' % Used to give a nice beam directed upwards.
+  \stemNeutral
+
+  \transpose c c {
+	  \stemDown  e'8[ e e']
+      }
 }
-\version "1.3.117";
-\score{
-	\notes\relative c''{
-		[g8 c c,]
-		[c16 c'' a f]
-		\stemUp 
-		[c,,32 c'' a f]
 
-	}
-	\paper{
-		linewidth=-1.;
-		\translator {
-		        \VoiceContext
-			% If we want to test extreme beams,
-			% we should not have them auto-kneed
-			Beam \override #'auto-knee-gap = ##f
-		}
-	}
+{
+				% If we want to test extreme beams,
+				% we should not have them auto-kneed
+  \override Beam  #'auto-knee-gap = ##f
+  \extreme
 }