From 1b913ce64901669921736117b2ed8aa36c55110e Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sat, 14 May 2022 20:33:11 +0000 Subject: lua-widow-control (14may22) git-svn-id: svn://tug.org/texlive/trunk@63302 c570f23f-e606-0410-a88d-b1316a301751 --- .../optex/lua-widow-control/lua-widow-control.opm | 21 ++++++++++----------- 1 file changed, 10 insertions(+), 11 deletions(-) (limited to 'Master/texmf-dist/tex/optex') diff --git a/Master/texmf-dist/tex/optex/lua-widow-control/lua-widow-control.opm b/Master/texmf-dist/tex/optex/lua-widow-control/lua-widow-control.opm index afae1aa6a60..cb6f4c06f97 100644 --- a/Master/texmf-dist/tex/optex/lua-widow-control/lua-widow-control.opm +++ b/Master/texmf-dist/tex/optex/lua-widow-control/lua-widow-control.opm @@ -3,7 +3,7 @@ % SPDX-License-Identifier: MPL-2.0+ % SPDX-FileCopyrightText: 2022 Max Chernoff -\_codedecl\lwcenable{lua-widow-control } %%version +\_codedecl\lwcenable{lua-widow-control } %%version \_namespace{lwc} \_clubpenalty=1 @@ -19,14 +19,6 @@ \_directlua{require "lua-widow-control"} -% Define \TeX{} wrappers for Lua functions -\_def\.enable{\_directlua{lwc.enable_callbacks()}} -\_def\.disable{\_directlua{lwc.disable_callbacks()}} -\_def\.iflwc{\_directlua{lwc.if_lwc_enabled()}} - -\_let\lwcenable=\.enable -\_let\lwcdisable=\.disable - % Enable \lwc/ by default when the package is loaded. \.enable @@ -37,7 +29,7 @@ \_newcount\.disable_count \_def\.patch_pre{% - \.iflwc% + \.if_enabled% \_advance\.disable_count by 1% \.disable% \_fi% @@ -70,11 +62,18 @@ \_endgroup% \_fi% } -\_let\lwcdisablecmd=\.disable_cmd \.disable_cmd{\_printchap} \.disable_cmd{\_printsec} \.disable_cmd{\_printsecc} +% Make the commands public +\_let\lwcenable=\.enable +\_let\lwcdisable=\.disable +\_let\lwcdisablecmd=\.disable_cmd +\_let\lwcdebug=\.debug +\_let\iflwc=\.if_enabled +\_let\lwcnobreak=\.nobreak + \_endnamespace \_endcode -- cgit v1.2.3