X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fstaccato-pos.ly;h=df275a688a340945312a125acc437e9463a2d990;hb=c8a1a62ce48cf237e106f6e9e9d4612d0b40c31b;hp=ec84117adcaeaf87a6b457e685a97c73209cadde;hpb=8b88bf025331c789167734067001a3d79501b433;p=lilypond.git

diff --git a/input/regression/staccato-pos.ly b/input/regression/staccato-pos.ly
index ec84117adc..df275a688a 100644
--- a/input/regression/staccato-pos.ly
+++ b/input/regression/staccato-pos.ly
@@ -1,19 +1,39 @@
 
+\version "2.16.0"
+
 \header{
-texidoc="
-The staccato dot (and all scripts with follow-into-staff set), must
-not be on staff lines.
-";
+
+  texidoc=" Some scripts must have quantized postions. VErtical
+ position descend monotonously for a descending scale.  The staccato
+ dot is close to the notehead. If the head is in a space, then the dot
+ is in the space next to it.  "
+
 }
-\score { 
-  \context Voice \notes\relative c {
-    
-	e''4-. f-. d-.
-	c,-. b-. c'''-. d-.
-	
+
+\layout {
+  ragged-right = ##t
+}
+
+{
+  \new Voice \relative c'' { 
+    \voiceOne
+    g8-. a-. b-. c-. 
+    a-. b-. c-. d-. 
+    b8[-. a-. g b] 
+    e,-. f-. g-. a-. 
+    e-. g-. b-. d-.
+  }
+  \context Voice {
+    \relative c' {
+      e'4-. f-. g-. d-. c-. b-.
+      \stemDown
+      e,-. d-. c-. b-. a-. g-.    
+    }
+    \relative c'' {
+      \stemUp		 
+      d-> c-> b-> a-> g-> f-> e-> d->
+      d'
+      d-. c-. b-. a-. g-. f-. e-. d-. 
+    }  
   }
-  \paper {
-    linewidth=-1.0;
-  }  
-  \midi { }
 }