" }
-\version "2.7.13"
+\version "2.7.14"
\relative c'{
\override Score.BarNumber #'break-visibility = #end-of-line-invisible
\set Score.barNumberVisibility = #(every-nth-bar-number-visible 4)
\override Score.BarNumber #'font-size = #2
- \override Score.BarNumber #'callbacks #'stencil
+ \override Score.BarNumber #'stencil
= #(make-stencil-boxer 0.1 0.25 Text_interface::print)
\repeat unfold 5 { c1 } \bar "|"
- \override Score.BarNumber #'callbacks #'stencil
+ \override Score.BarNumber #'stencil
= #(make-stencil-circler 0.1 0.25 Text_interface::print)
\repeat unfold 4 { c1 } \bar "|."
}
-\version "2.7.13"
+\version "2.7.14"
\header {
texidoc = "@cindex Boxed Stencil
\layout{raggedright = ##t}
\relative c'' {
- \override TextScript #'callbacks #'stencil =
+ \override TextScript #'stencil =
#(make-stencil-boxer 0.1 0.3 Text_interface::print)
c'4^"foo"
- \override Stem #'callbacks #'stencil =
+ \override Stem #'stencil =
#(make-stencil-boxer 0.05 0.25 Stem::print)
- \override Score.RehearsalMark #'callbacks #'stencil =
+ \override Score.RehearsalMark #'stencil =
#(make-stencil-boxer 0.15 0.3 Text_interface::print)
b8
- \revert Stem #'callbacks % stencil
+ \revert Stem % stencil
c4. c4 \mark "F" c1
-\version "2.7.13"
+\version "2.7.14"
\header {
texidoc = "@cindex Circle
\mark \default
c2 d^\markup{\circle \finger "2"}
\override Score.BarNumber #'break-visibility = #all-visible
-\override Score.BarNumber #'callbacks #'stencil
+\override Score.BarNumber #'stencil
= #(make-stencil-circler 0.1 0.25 Text_interface::print)
}
\ No newline at end of file
-\version "2.7.13"
+\version "2.7.14"
\header {
texidoc = "@cindex compound time
@cindex plus
\relative {
%% compound time signature hack
\time 5/8
- \override Staff.TimeSignature #'callbacks #'stencil
+ \override Staff.TimeSignature #'stencil
= #(lambda (grob) (compound-time grob "2" "3" "8"))
#(override-auto-beam-setting '(end 1 8 5 8) 1 4)
c8 c c8 c c
def conv (str):
- str = re.sub (r"#'callbacks", '', str)
+ str = re.sub (r"\\override +([A-Z.a-z]+) #'callbacks",
+ r"\\override \1", str)
+ str = re.sub (r"\\revert ([A-Z.a-z]+) #'callbacks % ([a-zA-Z]+)",
+ r"\\revert \1 #'\2", str)
str = re.sub (r"([XY]-extent)-callback", r'\1', str)
return str
;;; end of tablature functions
(define-public (make-stencil-boxer thickness padding callback)
+
"Return function that adds a box around the grob passed as argument."
- (lambda (grob) (box-stencil (callback grob) thickness padding)))
+ (lambda (grob)
+
+ (box-stencil (callback grob) thickness padding)))
(define-public (make-stencil-circler thickness padding callback)
"Return function that adds a circle around the grob passed as argument."