texlive[73056] Master/texmf-dist: piton (6dec24)
commits+karl at tug.org
commits+karl at tug.org
Fri Dec 6 23:33:01 CET 2024
Revision: 73056
https://tug.org/svn/texlive?view=revision&revision=73056
Author: karl
Date: 2024-12-06 23:33:01 +0100 (Fri, 06 Dec 2024)
Log Message:
-----------
piton (6dec24)
Modified Paths:
--------------
trunk/Master/texmf-dist/doc/lualatex/piton/piton-french.pdf
trunk/Master/texmf-dist/doc/lualatex/piton/piton.pdf
trunk/Master/texmf-dist/source/lualatex/piton/piton.dtx
trunk/Master/texmf-dist/tex/lualatex/piton/piton.lua
trunk/Master/texmf-dist/tex/lualatex/piton/piton.sty
Modified: trunk/Master/texmf-dist/doc/lualatex/piton/piton-french.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/doc/lualatex/piton/piton.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/source/lualatex/piton/piton.dtx
===================================================================
--- trunk/Master/texmf-dist/source/lualatex/piton/piton.dtx 2024-12-06 22:32:52 UTC (rev 73055)
+++ trunk/Master/texmf-dist/source/lualatex/piton/piton.dtx 2024-12-06 22:33:01 UTC (rev 73056)
@@ -39,7 +39,7 @@
\PitonOptions
{
splittable = 4 ,
- math-comments,
+ math-comments ,
begin-escape = ! ,
end-escape = ! ,
begin-escape-math = \( ,
@@ -67,7 +67,7 @@
\vphantom{gl}\textbackslash #1}}}
-\PitonOptions{gobble=2}
+\PitonOptions{gobble=2}
\EnableCrossrefs
@@ -79,12 +79,12 @@
% \iffalse
%<*STY>
% \fi
-\def\PitonFileVersion{4.2}
-\def\PitonFileDate{2024/11/18}
+\def\PitonFileVersion{4.2a}
+\def\PitonFileDate{2024/12/06}
% \iffalse
%</STY>
%<*LUA>
-piton_version = "4.2" -- 2024/11/18
+piton_version = "4.2a" -- 2024/12/06
%</LUA>
%\fi
%
@@ -2672,7 +2672,7 @@
% the keywords are case-sensitive or not) \\
% Directive & the directives defined in |\NewPitonLanguage| by the key
% |moredirectives| \\
-% Tag & the ``tags'' defines by the key |tag| (the lexical units detected within
+% Tag & the ``tags'' defined by the key |tag| (the lexical units detected within
% the tag will also be formatted with their own style) \\
% Identifier & the identifiers. \\
% \bottomrule
@@ -3081,6 +3081,17 @@
%
% \bigskip
% \begin{macrocode}
+\msg_new:nnn { piton } { old-PitonInputFile }
+ {
+ Be~careful:~The~key~'old-PitonInputFile'~will~be~deleted~
+ in~a~future~version~of~'piton'.
+ }
+\bool_if:NT \l_@@_old_PitonInputFile_bool
+ { \msg_warning:nn { piton } { old-PitonInputFile } }
+% \end{macrocode}
+%
+% \bigskip
+% \begin{macrocode}
\IfClassLoadedTF { beamer } { \bool_gset_true:N \g_@@_beamer_bool } { }
\IfPackageLoadedTF { beamerarticle } { \bool_gset_true:N \g_@@_beamer_bool } { }
\lua_now:n { piton = piton~or~{ } }
@@ -4750,11 +4761,19 @@
}
{
\group_end:
+% \end{macrocode}
+% Maybe, we should deactivate all the ``shorthands'' of \pkg{babel} (when
+% \pkg{babel} is loaded) with the following instruction:
+%
+% \verb|\IfPackageLoadedT { babel } { \languageshorthands { none } }|
+%
+% But we should be sure that there is no consequence in the LaTeX comments...
+% \begin{macrocode}
\mode_if_vertical:TF \noindent \newline
% \end{macrocode}
% The following line is only to compute |\l_@@_lines_int| which will be used
% only when both |left-margin=auto| and |skip-empty-lines = false| are in force.
-% You should change that.
+% We should change that.
% \begin{macrocode}
\lua_now:e { piton.CountLines ( '\lua_escape:n{##1}' ) }
% \end{macrocode}
@@ -7312,7 +7331,7 @@
* Q "=" * SkipSpace
% \end{macrocode}
% Don't forget the parentheses!
-% \end{document}
+% \begin{macrocode}
* ( C ( expression_for_fields_value ) / ParseAgain )
* SkipSpace
% \end{macrocode}
@@ -8933,8 +8952,8 @@
extra_others[c] = true
% \end{macrocode}
% The \textsc{lpeg} pattern |other| will be used in conjunction with the key
-% |tag| (mainly for the language \textsc{html}) for the character |/| in the
-% closing tags |</....>|).
+% |tag| (mainly for languages such as \textsc{html} and \textsc{xml}) for the
+% character |/| in the closing tags |</....>|).
% \begin{macrocode}
other = other + P ( c )
end
@@ -9252,6 +9271,7 @@
local arg3 = ( tex_braced_arg + C ( P ( 1 ) ^ 0 * -1 ) )
: match ( other_args )
if arg3 == [[\#]] then arg3 = "#" end -- mandatory
+ if arg3 == [[\%]] then arg3 = "%" end -- mandatory¨
CommentDelim = CommentDelim +
Ct ( Cc "Open"
* Cc ( "{" .. arg2 .. "{" ) * Cc "}}" )
@@ -9393,7 +9413,7 @@
% \end{macrocode}
%
% If the key |tag| has been used. Of course, this feature is designed for the
-% \textsc{html}.
+% languages such as \textsc{html} and \textsc{xml}.
% \begin{macrocode}
if left_tag then
local Tag = Ct ( Cc "Open" * Cc ( "{" .. style_tag .. "{" ) * Cc "}}" )
Modified: trunk/Master/texmf-dist/tex/lualatex/piton/piton.lua
===================================================================
--- trunk/Master/texmf-dist/tex/lualatex/piton/piton.lua 2024-12-06 22:32:52 UTC (rev 73055)
+++ trunk/Master/texmf-dist/tex/lualatex/piton/piton.lua 2024-12-06 22:33:01 UTC (rev 73056)
@@ -20,7 +20,7 @@
-- -------------------------------------------
--
-- This file is part of the LuaLaTeX package 'piton'.
-piton_version = "4.2" -- 2024/11/18
+piton_version = "4.2a" -- 2024/12/06
@@ -1847,6 +1847,7 @@
local arg3 = ( tex_braced_arg + C ( P ( 1 ) ^ 0 * -1 ) )
: match ( other_args )
if arg3 == [[\#]] then arg3 = "#" end -- mandatory
+ if arg3 == [[\%]] then arg3 = "%" end -- mandatory¨
CommentDelim = CommentDelim +
Ct ( Cc "Open"
* Cc ( "{" .. arg2 .. "{" ) * Cc "}}" )
Modified: trunk/Master/texmf-dist/tex/lualatex/piton/piton.sty
===================================================================
--- trunk/Master/texmf-dist/tex/lualatex/piton/piton.sty 2024-12-06 22:32:52 UTC (rev 73055)
+++ trunk/Master/texmf-dist/tex/lualatex/piton/piton.sty 2024-12-06 22:33:01 UTC (rev 73056)
@@ -19,8 +19,8 @@
%% LaTeX version 2005/12/01 or later.
%% -------------------------------------------
%%
-\def\PitonFileVersion{4.2}
-\def\PitonFileDate{2024/11/18}
+\def\PitonFileVersion{4.2a}
+\def\PitonFileDate{2024/12/06}
@@ -116,6 +116,13 @@
That~key~will~be~ignored.
}
\ProcessKeysOptions { piton / package }
+\msg_new:nnn { piton } { old-PitonInputFile }
+ {
+ Be~careful:~The~key~'old-PitonInputFile'~will~be~deleted~
+ in~a~future~version~of~'piton'.
+ }
+\bool_if:NT \l__piton_old_PitonInputFile_bool
+ { \msg_warning:nn { piton } { old-PitonInputFile } }
\IfClassLoadedTF { beamer } { \bool_gset_true:N \g__piton_beamer_bool } { }
\IfPackageLoadedTF { beamerarticle } { \bool_gset_true:N \g__piton_beamer_bool } { }
\lua_now:n { piton = piton~or~{ } }
More information about the tex-live-commits
mailing list.