From 4c47eb4c65696a0ea40b1d4352829064b2fedef4 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Tue, 30 Apr 2019 22:33:28 +0000 Subject: csplain (30apr19) git-svn-id: svn://tug.org/texlive/trunk@50907 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/csplain/base/lua-hyphen.lan | 22 +++++++++++----------- 1 file changed, 11 insertions(+), 11 deletions(-) (limited to 'Master/texmf-dist/tex/csplain/base') diff --git a/Master/texmf-dist/tex/csplain/base/lua-hyphen.lan b/Master/texmf-dist/tex/csplain/base/lua-hyphen.lan index 790d52c6c18..9c84902d149 100644 --- a/Master/texmf-dist/tex/csplain/base/lua-hyphen.lan +++ b/Master/texmf-dist/tex/csplain/base/lua-hyphen.lan @@ -4,7 +4,7 @@ \global\chardef\enPatt=0 \gdef\pattlist{\enPatt=0} \gdef\langlist{en(USpreloaded)} -\gdef\enlang{\uselang{en}\enPatt23\nonfrenchspacing} % \lefthyph=2 \righthyph=3 +\gdef\enlang{\dolangua{en}\enPatt23\nonfrenchspacing} % \lefthyph=2 \righthyph=3 \input uni-lcuc % \lccodes, \uccodes in unicode @@ -14,7 +14,7 @@ \def\next{\expandafter\noexpand\csname #1lang\endcsname} \expandafter\xdef \csname #1lang\endcsname {% \noexpand\loadpattrs #2 #4 - \gdef\next{\noexpand\uselang{#1}#3#5}% + \gdef\next{\noexpand\dolangua{#1}#3#5}% \next } \xdef\langlist{\langlist\space #1(#2)} @@ -25,11 +25,11 @@ luatexhyphen.loadlanguage("#1",#2) }% } -\def\uselang#1#2#3#4{\language=#2\lefthyphenmin=#3\righthyphenmin=#4\relax - \frenchspacing % \nonfrenchspacing can be set in \setlanguage{lan} - \setlanguage{#1}% +\def\dolangua#1#2#3#4{\language=#2\lefthyphenmin=#3\righthyphenmin=#4\relax + \frenchspacing % \nonfrenchspacing can be set in \initlanguage{lan} + \initlanguage{#1}% } -\def\setlanguage#1{} +\def\initlanguage#1{} \preplang enus usenglishmax \enusPatt 100 23 \preplang engb ukenglish \engbPatt 101 23 @@ -113,19 +113,19 @@ For example \preplang cs czech \csPatt 115 23 does: \global\chardef\csPatt=115 \gdef\lan:115{cs} \gdef\cslang{\loadpattrs czech 115 - \gdef\cslang{\uselang{cs}\csPatt23}% + \gdef\cslang{\dolangua{cs}\csPatt23}% \cslang} \xdef\langlist{\langlist\space #1(#2)} -and \uselang{cs}\csPatt23 does: +and \dolangua{cs}\csPatt23 does: \language=\csPatt \lefthyphenmin=2 \righthyphenmin=3 - \frenchspacing \setlanguage{cs} + \frenchspacing \initlanguage{cs} -finally \setlanguage{cs} does nothing by default. But user can redefine +finally \initlanguage{cs} does nothing by default. But user can redefine it and specify another features for selected lanuages here. For example: -\def\setlanguage#1{\csname set#1lang\endcsname} +\def\initlanguage#1{\csname set#1lang\endcsname} \def\setenuslang {\nonfrenchspacing} \def\setcslang {...czech specific} \def\setpllang {...polish specific} -- cgit v1.2.3