X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fbreathing-sign.ly;h=f9e37878598fdf168876402d2e16737f5efdd777;hb=2fecabf3a5cb332c78b58b02f78c7c64d5c89c19;hp=f5b8f1d280e5db2a7beb3711f42ab96c2dbbf910;hpb=4f539779dab7835eff9f1be801f05bc269a799cd;p=lilypond.git

diff --git a/input/regression/breathing-sign.ly b/input/regression/breathing-sign.ly
index f5b8f1d280..f9e3787859 100644
--- a/input/regression/breathing-sign.ly
+++ b/input/regression/breathing-sign.ly
@@ -1,92 +1,43 @@
-\version "1.7.16"
+\version "2.17.6"
 \header{
-texidoc="
-Breathing signs, also used for phrasing, do normally not influence
-global spacing -- only if space gets tight, notes are shifted to make
-room for the breathing sign. Breathing signs break beams running
-through their voice. In the following example, the notes in the first
-two measures all have the same distance from each other.
-
+  texidoc="
 Breathing signs are available in different tastes: commas (default),
-ticks, vees and `railroad tracks' (caesura).
-
-Gregorian chant notation sometimes also uses commas and ticks, but in
-smaller font size (we call it 'virgula' and 'caesura').  However, the
-most common breathing signs are divisio minima/maior/maxima and
-finalis, the latter three looking similar to bar glyphs.
-
-" }
-
-\include "gregorian-init.ly"
-
-\score {
-  \notes \relative c' {
-    \key es \major \time 3/4
-
-% this bar contains no \breathe
-    < \context Voice = two { \stemDown es4 bes es }
-      \context Voice = one { \stemUp g4 as g }
-    > |
-
-% by default, \breathe uses the rcomma, just as if saying:
-% \property Voice.BreathingSign \set #'text = #"scripts-rcomma"
-    < \context Voice = two { \stemDown es4 \breathe bes es }
-      \context Voice = one { \stemUp g4 as g }
-    > |
-
-% rvarcomma and lvarcomma are variations of the default rcomma and lcomma
-    % N.B.: must use Staff context here, since we start a Voice below
-    \property Staff.BreathingSign \override #'text = #"scripts-rvarcomma"
-    < \context Voice = two { \stemDown es4 \breathe bes es }
-      \context Voice = one { \stemUp g4 as g }
-    > |
-
-% wedge
-    \property Voice.BreathingSign \override #'text = #"scripts-upbow"
-    es8 d es f g8 \breathe f |
-
-% caesura
-    \property Voice.BreathingSign \set #'text = #"scripts-caesura"
-    [es8 d] \breathe [es f g f] |
-    es2 r4 \bar "||" \break
-
-%
-% Gregorian stuff:
-%
-
-% we turn bars off for Gregorian stuff
-    \property Staff.BarLine \override #'transparent = ##t
-
-% this bar contains no \breathe
-    < \context Voice = two { \stemDown es4 bes es }
-      \context Voice = one { \stemUp g4 as g }
-    > |
-
-% \virgula applies rcomma, but in a smaller font
-    < \context Voice = two { \stemDown es4 \virgula bes es }
-      \context Voice = one { \stemUp g4 as g }
-    > |
-
-% \caesura applies rvarcomma, but in a smaller font
-    < \context Voice = two { \stemDown es4 \caesura bes es }
-      \context Voice = one { \stemUp g4 as g }
-    > |
+ticks, vees and `railroad tracks' (caesura)."
+}
 
-% \divisioMinima is a simple vertical stroke through the uppermost
-% staffline, just like the original implementation of breathing signs.
-    < \context Voice = two { \stemDown es4 \divisioMinima bes es }
-      \context Voice = one { \stemUp g4 as g }
-    > |
-% \divisio{maior,maxima} and \finalis look like bars and are vertically
-% centered on the staff; the direction property has no effect
-    < \context Voice = two { \stemDown es4 \divisioMaior bes es }
-      \context Voice = one { \stemUp g4 as g }
-    > |
-    < \context Voice = two { \stemDown es4 \divisioMaxima bes es }
-      \context Voice = one { \stemUp g4 as g }
-    > |
 
-% this one looks almost like a "||" type bar
-    \finalis
+{
+  %% Modern notation:
+  \new Staff {
+    \relative c'' {
+      %% by default, \breathe uses the rcomma, just as if saying:
+      %% \override BreathingSign.text =
+      %%   #(make-musicglyph-markup "scripts.rcomma")
+      %%
+      c4 c \breathe c c |
+
+      %% rvarcomma and lvarcomma are variations of the default rcomma
+      %% and lcomma
+      %%
+      \override Staff.BreathingSign.text =
+        #(make-musicglyph-markup "scripts.rvarcomma")
+      c4 c \breathe c c |
+
+      %% wedge
+      %%
+      \override BreathingSign.text =
+        #(make-musicglyph-markup "scripts.upbow")
+      c4 c \breathe c c |
+
+      %% caesurae
+      %%
+      \override BreathingSign.text =
+        #(make-musicglyph-markup "scripts.caesura.curved")
+      c4 c \breathe c c |
+
+      \override BreathingSign.text =
+        #(make-musicglyph-markup "scripts.caesura.straight")
+      c4 c \breathe c c |
+    }
   }
 }