]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/stencil-hacking.ly
Merge commit 'origin' into beamlets2
[lilypond.git] / input / regression / stencil-hacking.ly
index fc13bb2126e874f3c7321996f10389e03cc996de..b95fffb857b9f7c44ad65c8ed07f38299097b309 100644 (file)
@@ -1,5 +1,5 @@
 
-\version "2.7.0"
+\version "2.12.0"
 
 \header { texidoc=" You can write stencil callbacks in Scheme, thus
 providing custom glyphs for notation elements.  A simple example is
@@ -18,7 +18,7 @@ Example usage:
 
   \\property NoteHead \\override #'print-function
                   =
-                     #(parenthesize-callback Note_head::print)
+                     #(parenthesize-callback ly:note-head::print)
                    
 "
 
@@ -37,7 +37,7 @@ GROB.  The dimensions of the stencil is not affected.
            (subject-dim-x (ly:stencil-extent subject 0))
            (subject-dim-y (ly:stencil-extent subject 1)))
 
-        ; add parens
+        ;; add parens
         (set! subject
             (ly:stencil-combine-at-edge 
              (ly:stencil-combine-at-edge subject 0 1 pclose 0.2)
@@ -49,18 +49,19 @@ GROB.  The dimensions of the stencil is not affected.
    parenthesize-stencil)
     
 
-\layout { raggedright = ##t }
+\layout { ragged-right = ##t }
 \relative c' {
     c4 e
 
-    \override NoteHead  #'print-function
+    \override NoteHead  #'stencil
     =
-    #(parenthesize-callback Note_head::print)
+    #(parenthesize-callback ly:note-head::print)
     g bes
-    \revert NoteHead #'print-function
-    \override Beam  #'print-function
+    \revert NoteHead #'stencil
+
+    \override Beam  #'stencil
     =
-    #(parenthesize-callback Beam::print)
+    #(parenthesize-callback ly:beam::print)
 
     a8 gis8 a2.