X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fly-examples%2Ftab-example.ly;h=1d954efbc6875c025912fec0b80a9a1d324a7778;hb=777ce245ecf9041a98d977f017c10b4edabaec04;hp=c2be0d7b5961ff03e165a341b835ec153ca26c4e;hpb=3b8f430efd506ccd6ae8235be0f08468c0da937d;p=lilypond.git

diff --git a/Documentation/ly-examples/tab-example.ly b/Documentation/ly-examples/tab-example.ly
index c2be0d7b59..1d954efbc6 100644
--- a/Documentation/ly-examples/tab-example.ly
+++ b/Documentation/ly-examples/tab-example.ly
@@ -1,6 +1,4 @@
-\version "2.15.10"
-
-#(set-global-staff-size 22.45)
+\version "2.19.21"
 
 #(define (glissando::calc-extra-dy grob)
    (let* ((original (ly:grob-original grob))
@@ -14,22 +12,6 @@
          (- (ly:pitch-alteration right-pitch) (ly:pitch-alteration left-pitch))
          0 )))
 
-% Hide fret number: useful to draw slide into/from a casual point of
-% the fretboard.
-hideFretNumber = {
-  \once \override TabNoteHead #'transparent = ##t
-  \once \override TabNoteHead #'whiteout = ##f
-  \once \override NoteHead #'transparent = ##t
-  \once \override Stem #'transparent = ##t
-  \once \override Flag #'transparent = ##t
-  \once \override NoteHead #'no-ledgers = ##t
-}
-
-\paper {
-  indent= #0
-  line-width= #180
-}
-
 upper= \relative c' {
   \time 4/4
   \key e \major
@@ -43,32 +25,32 @@ upper= \relative c' {
   < gis\4 d'\3 fis\2 >2 < b'\2\harmonic e\harmonic >2\fermata
 }
 
-lower= \relative c {
+lower= \relative {
   \set fingeringOrientations = #'(left)
 
   \partial 4. s4.
   s4 e,4 s2
   s2 s8 < e'-3 >4. ~
-  e4 \hideFretNumber \grace { b8 \glissando s4 } < e-2 >4\5 e,2 ~
-  e2 < e'\6\harmonic >
+  e4 \hideNotes \grace { b8 \glissando s4 } \unHideNotes < e-2 >4\5 e,2 ~
+  2 < e'\6\harmonic >
 }
 
 \score {
-  \new StaffGroup <<
+  \new StaffGroup \with {instrumentName = #"Guitar" } <<
     \new Staff = "guitar" <<
       \context Voice = "upper guitar" {
         \clef "G_8" \voiceOne
-        \override Glissando #'gap = #0.5
-        \override Glissando #'extra-offset = #'(-0.5 . 0)
-        \override Glissando #'springs-and-rods = #ly:spanner::set-spacing-rods
-        \override Glissando #'minimum-length = #4
-        \override Glissando #'extra-dy = #glissando::calc-extra-dy
+        \override Glissando.gap = #0.5
+        \override Glissando.extra-offset = #'(-0.5 . 0)
+        \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+        \override Glissando.minimum-length = #4
+        \override Glissando.extra-dy = #glissando::calc-extra-dy
         \upper
       }
       \context Voice = "lower guitar" {
         \clef "G_8" \voiceTwo
-        \override Glissando #'bound-details #'right #'padding = #1
-        \override Glissando #'bound-details #'left #'padding = #0.2
+        \override Glissando.bound-details.right.padding = #1
+        \override Glissando.bound-details.left.padding = #0.2
         \lower
       }
     >>
@@ -81,11 +63,11 @@ lower= \relative c {
   \layout {
     \context {
       \Staff
-      \override StringNumber #'transparent = ##t
+      \hide StringNumber
     }
     \context {
       \TabStaff
-      \revert Arpeggio #'stencil
+      \revert Arpeggio.stencil
     }
   }
 }