X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdefine-stencil-commands.scm;h=904b6348d42c967ccce64e705935d38749c30cdc;hb=9e781b7dc83b60a543ce218aa1a5f139f74c760f;hp=06177cb5126d1f5d16f6cc744a4bbfe34f92e6c8;hpb=b231459a563c15e11b426c72192d15c49be156b4;p=lilypond.git diff --git a/scm/define-stencil-commands.scm b/scm/define-stencil-commands.scm index 06177cb512..904b6348d4 100644 --- a/scm/define-stencil-commands.scm +++ b/scm/define-stencil-commands.scm @@ -1,6 +1,6 @@ ;;;; This file is part of LilyPond, the GNU music typesetter. ;;;; -;;;; Copyright (C) 2005--2012 Han-Wen Nienhuys +;;;; Copyright (C) 2005--2014 Han-Wen Nienhuys ;;;; ;;;; LilyPond is free software: you can redistribute it and/or modify ;;;; it under the terms of the GNU General Public License as published by @@ -21,8 +21,7 @@ (define-public (ly:all-stencil-commands) "Return the list of stencil commands that can be defined in the output modules (@file{output-*.scm})." - '(bezier-sandwich - blank + '(blank char circle dashed-line @@ -40,7 +39,6 @@ defined in the output modules (@file{output-*.scm})." partial-ellipse placebox polygon - repeat-slash resetcolor resetrotation resetscale @@ -53,7 +51,6 @@ defined in the output modules (@file{output-*.scm})." unknown url-link utf-8-string - zigzag-line )) ;; TODO: @@ -70,8 +67,9 @@ are used internally in @file{lily/@/stencil-interpret.cc}." rotate-stencil scale-stencil translate-stencil + transparent-stencil )) -(map ly:register-stencil-expression - (append (ly:all-stencil-commands) - (ly:all-output-backend-commands))) +(for-each ly:register-stencil-expression + (append (ly:all-stencil-commands) + (ly:all-output-backend-commands)))