From 2639cda39baf8b76bc02b0e2cd4e426570ee46d5 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Fri, 19 Aug 2016 21:44:56 +0000 Subject: leadsheets (19aug16) git-svn-id: svn://tug.org/texlive/trunk@41890 c570f23f-e606-0410-a88d-b1316a301751 --- .../leadsheets/leadsheets.library.templates.code.tex | 15 +++++++-------- 1 file changed, 7 insertions(+), 8 deletions(-) (limited to 'Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.templates.code.tex') diff --git a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.templates.code.tex b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.templates.code.tex index bb6e2b98639..c4b908ff6ae 100644 --- a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.templates.code.tex +++ b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.templates.code.tex @@ -5,7 +5,6 @@ % % -------------------------------------------------------------------------- % Clemens Niederberger -% Web: http://www.mychemistry.eu/forums/forum/leadsheets/ % E-Mail: contact@mychemistry.eu % -------------------------------------------------------------------------- % Copyright 2014-2016 Clemens Niederberger @@ -31,11 +30,11 @@ \tl_new:N \l__leadsheets_songtitle_template_tl \prop_new:N \l__leadsheets_songtitle_template_prop -\NewDocumentCommand \songtitle {} { \leadsheets_songtitle: } +% \NewDocumentCommand \songtitle {} { \leadsheets_songtitle: } % the following is shamelessly adapted from the `needspace' package by % Peter Wilson and Herries Press: -\cs_new:Npn \leadsheets_needspace:n #1 +\cs_new_protected:Npn \__leadsheets_needspace:n #1 { \group_begin: \dim_set:Nn \l__leadsheets_tmpa_dim { #1 } @@ -49,13 +48,13 @@ \group_end: } -\cs_new_protected:Npn \leadsheets_songtitle: +\cs_new_protected:Npn \__leadsheets_songtitle: { - \leadsheets_use_songtitle_template:V \l__leadsheets_songtitle_template_tl - \leadsheets_needspace:n { 3\baselineskip } + \__leadsheets_use_songtitle_template:V \l__leadsheets_songtitle_template_tl + \__leadsheets_needspace:n { 3\baselineskip } } -\cs_new_protected:Npn \leadsheets_use_songtitle_template:n #1 +\cs_new_protected:Npn \__leadsheets_use_songtitle_template:n #1 { \prop_get:NnNTF \l__leadsheets_songtitle_template_prop {#1} @@ -63,7 +62,7 @@ { \l__leadsheets_tmpa_tl } { \msg_error:nnnn {leadsheets} {unknown-template} {songtitle} {#1} } } -\cs_generate_variant:Nn \leadsheets_use_songtitle_template:n { V } +\cs_generate_variant:Nn \__leadsheets_use_songtitle_template:n { V } \cs_new_protected:Npn \leadsheets_define_songtitle_template:nn #1#2 { \prop_put:Nnn \l__leadsheets_songtitle_template_prop {#1} {#2} } -- cgit v1.2.3