From 6c1751cee457de0533d12ffca893b294e2c87f2a Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 13 Feb 2014 23:34:07 +0000 Subject: expex (13feb14) git-svn-id: svn://tug.org/texlive/trunk@32962 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/generic/expex/expex.tex | 13 ++++++------- 1 file changed, 6 insertions(+), 7 deletions(-) (limited to 'Master/texmf-dist/tex/generic/expex') diff --git a/Master/texmf-dist/tex/generic/expex/expex.tex b/Master/texmf-dist/tex/generic/expex/expex.tex index ebe66a15254..a7a8647eaaf 100644 --- a/Master/texmf-dist/tex/generic/expex/expex.tex +++ b/Master/texmf-dist/tex/generic/expex/expex.tex @@ -33,6 +33,7 @@ % jf 2014/01/27 MAJOR REVISIONS: vertical spacing in glosses, % introduction of nlevel style glosses (see User's Manual, also % revised at this time) for more detail about the changes +% jf 2014/02/13 renamed setlist to ep@setlist % -------------------------------------------------------- \edef\resetatcatcode{\catcode`\noexpand\@\the\catcode`\@\relax} \catcode`\@=11\relax @@ -723,8 +724,8 @@ \gl@beginglstyle } % parameters which are used in both gloss styles -\define@ling@cmdkeys{everygl,everyglpreamble,everyglilg,everyglft} -\define@ling@cmdkeys{everyglword,glrightskip,glhangindent,glwidth} +\define@ling@cmdkeys{everygl,everyglpreamble,everyglilg, everyglft, + everyglword,glrightskip,glhangindent,glwidth} \define@lingincskipkeys{glspace,aboveglftskip,belowglpreambleskip,extraglskip} \newbox\glstrutbox \def\glstrut{\unhcopy\glstrutbox} @@ -1234,14 +1235,12 @@ \ling@everyglft } \def\gln@endgl{\par\egroup\egroup\egroup\egroup} -\define@lingkey{glneveryline}{\setlist\gln@everyline{#1}} -\define@lingkey{glnabovelineskip}{\setlist\gln@abovelineskip{#1}% +\define@lingkey{glneveryline}{\ep@setlist\gln@everyline{#1}} +\define@lingkey{glnabovelineskip}{\ep@setlist\gln@abovelineskip{#1}% \gl@lop\gln@abovelineskip\to\temp \gl@push{}\to\gln@abovelineskip } -\def\setlist#1#2{\def#1{}\XKV@for@n{#2}\@this{\gl@eappend\@this\to#1}} -%\def\ep@setlist#1#2{\def#1{}\XKV@for@n{#2}\@this{\expandafter\ep@append\@this\to#1}} -%\def\setlist#1#2{\def#1{}\XKV@for@n{#2}\@this{\expandafter\gl@normalappend\@this\to#1}} +\def\ep@setlist#1#2{\def#1{}\XKV@for@n{#2}\@this{\gl@eappend\@this\to#1}} \lingset{glneveryline={\it},glnabovelineskip={}} %%%%%%%%%%%%%%%% end nlevel %%%%%%%%%%%%%%%%%%%% -- cgit v1.2.3