From 8b7758314c06098bdf78be42b7ed8987b621467b Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Wed, 3 Feb 2016 23:01:38 +0000 Subject: leadsheets (3feb16) git-svn-id: svn://tug.org/texlive/trunk@39564 c570f23f-e606-0410-a88d-b1316a301751 --- .../leadsheets/leadsheets.library.songs.code.tex | 44 +++++++++++++++++++++- 1 file changed, 42 insertions(+), 2 deletions(-) (limited to 'Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.songs.code.tex') diff --git a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.songs.code.tex b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.songs.code.tex index 79d235f66aa..63e3fc12832 100644 --- a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.songs.code.tex +++ b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.songs.code.tex @@ -1,4 +1,28 @@ -\LeadsheetsExplLibrary{songs}{2015/07/27 typesetting songs} +% -------------------------------------------------------------------------- +% the LEADSHEETS package +% +% typesetting leadsheets and songbooks +% +% -------------------------------------------------------------------------- +% Clemens Niederberger +% Web: http://www.mychemistry.eu/forums/forum/leadsheets/ +% E-Mail: contact@mychemistry.eu +% -------------------------------------------------------------------------- +% Copyright 2014-2016 Clemens Niederberger +% +% This work may be distributed and/or modified under the +% conditions of the LaTeX Project Public License, either version 1.3 +% of this license or (at your option) any later version. +% The latest version of this license is in +% http://www.latex-project.org/lppl.txt +% and version 1.3 or later is part of all distributions of LaTeX +% version 2005/12/01 or later. +% +% This work has the LPPL maintenance status `maintained'. +% +% The Current Maintainer of this work is Clemens Niederberger. +% -------------------------------------------------------------------------- +\LeadsheetsExplLibrary{songs}{2016/02/02 typesetting songs} % -------------------------------------------------------------------------- % messages: @@ -331,6 +355,13 @@ { \prg_return_false: } } +\prg_new_conditional:Npnn \leadsheets_if_measuring: {T,F,TF} + { + \bool_if:NTF \l__leadsheets_measuring_bool + { \prg_return_true: } + { \prg_return_false: } + } + \cs_new_protected:Npn \leadsheets_check_print:n #1 { \leadsheets_if_print_tags:nT {#1} @@ -557,7 +588,12 @@ \keys_set:nn {leadsheets/#2} {##1} \tl_set:Nx \l_leadsheets_verse_type_tl { #2-\tl_use:c {l__leadsheets_#2_class_tl} } - \bool_if:NF \l__leadsheets_recall_verse_type_bool + \bool_if:NTF \l__leadsheets_recall_verse_type_bool + { + \tl_set_eq:NN + \l_leadsheets_verse_type_tl + \l__leadsheets_recall_verse_type_tl + } { \tl_set_eq:NN \l__leadsheets_recall_verse_type_tl @@ -567,6 +603,9 @@ { \seq_gclear:N \g__leadsheets_chords_sequences_seq } \leadsheets_if_recall_chords:T { + % \prop_show:N \g__leadsheets_chords_sequences_prop + % \tl_show:N \l__leadsheets_recall_verse_type_tl + % \seq_show:N \g__leadsheets_chords_sequences_seq \prop_get:NVN \g__leadsheets_chords_sequences_prop \l__leadsheets_recall_verse_type_tl @@ -673,3 +712,4 @@ 2015/07/05: enable usage of # in the key property 2015/07/27: new options `before-song', `after-song', `after-title' and `add-to-reset' +2015/02/02: enable to recall chords even if verse is used the first time -- cgit v1.2.3