texlive[52162] trunk: perltex (23sep19)
commits+karl at tug.org
commits+karl at tug.org
Mon Sep 23 22:58:22 CEST 2019
Revision: 52162
http://tug.org/svn/texlive?view=revision&revision=52162
Author: karl
Date: 2019-09-23 22:58:21 +0200 (Mon, 23 Sep 2019)
Log Message:
-----------
perltex (23sep19)
Modified Paths:
--------------
trunk/Build/source/texk/texlive/linked_scripts/perltex/perltex.pl
trunk/Master/texmf-dist/doc/latex/perltex/README
trunk/Master/texmf-dist/doc/latex/perltex/example.tex
trunk/Master/texmf-dist/doc/latex/perltex/perltex.pdf
trunk/Master/texmf-dist/doc/man/man1/perltex.1
trunk/Master/texmf-dist/doc/man/man1/perltex.man1.pdf
trunk/Master/texmf-dist/scripts/perltex/perltex.pl
trunk/Master/texmf-dist/source/latex/perltex/perltex.dtx
trunk/Master/texmf-dist/source/latex/perltex/perltex.ins
trunk/Master/texmf-dist/tex/latex/perltex/perltex.sty
Modified: trunk/Build/source/texk/texlive/linked_scripts/perltex/perltex.pl
===================================================================
--- trunk/Build/source/texk/texlive/linked_scripts/perltex/perltex.pl 2019-09-23 20:58:04 UTC (rev 52161)
+++ trunk/Build/source/texk/texlive/linked_scripts/perltex/perltex.pl 2019-09-23 20:58:21 UTC (rev 52162)
@@ -15,7 +15,7 @@
#
# This is a generated file.
#
-# Copyright (C) 2010 Scott Pakin <scott+pt at pakin.org>
+# Copyright (C) 2003-2019 Scott Pakin <scott+pt at pakin.org>
#
# This file may be distributed and/or modified under the conditions
# of the LaTeX Project Public License, either version 1.3c of this
Modified: trunk/Master/texmf-dist/doc/latex/perltex/README
===================================================================
--- trunk/Master/texmf-dist/doc/latex/perltex/README 2019-09-23 20:58:04 UTC (rev 52161)
+++ trunk/Master/texmf-dist/doc/latex/perltex/README 2019-09-23 20:58:21 UTC (rev 52162)
@@ -42,7 +42,7 @@
License
-------
-Copyright (C) 2010 Scott Pakin
+Copyright (C) 2003-2019 Scott Pakin
These files may be distributed and/or modified under the conditions of
the LaTeX Project Public License, either version 1.3c of this license or
Modified: trunk/Master/texmf-dist/doc/latex/perltex/example.tex
===================================================================
--- trunk/Master/texmf-dist/doc/latex/perltex/example.tex 2019-09-23 20:58:04 UTC (rev 52161)
+++ trunk/Master/texmf-dist/doc/latex/perltex/example.tex 2019-09-23 20:58:21 UTC (rev 52162)
@@ -8,7 +8,7 @@
%%
%% This is a generated file.
%%
-%% Copyright (C) 2010 Scott Pakin <scott+pt at pakin.org>
+%% Copyright (C) 2003-2019 Scott Pakin <scott+pt at pakin.org>
%%
%% This file may be distributed and/or modified under the conditions of
%% the LaTeX Project Public License, either version 1.3c of this license
Modified: trunk/Master/texmf-dist/doc/latex/perltex/perltex.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/doc/man/man1/perltex.1
===================================================================
--- trunk/Master/texmf-dist/doc/man/man1/perltex.1 2019-09-23 20:58:04 UTC (rev 52161)
+++ trunk/Master/texmf-dist/doc/man/man1/perltex.1 2019-09-23 20:58:21 UTC (rev 52162)
@@ -1,4 +1,4 @@
-.\" Automatically generated by Pod::Man 2.1801 (Pod::Simple 3.05)
+.\" Automatically generated by Pod::Man 4.10 (Pod::Simple 3.35)
.\"
.\" Standard preamble:
.\" ========================================================================
@@ -38,6 +38,8 @@
. ds PI \(*p
. ds L" ``
. ds R" ''
+. ds C`
+. ds C'
'br\}
.\"
.\" Escape single quotes in literal strings from groff's Unicode transform.
@@ -44,21 +46,28 @@
.ie \n(.g .ds Aq \(aq
.el .ds Aq '
.\"
-.\" If the F register is turned on, we'll generate index entries on stderr for
+.\" If the F register is >0, we'll generate index entries on stderr for
.\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index
.\" entries marked with X<> in POD. Of course, you'll have to process the
.\" output yourself in some meaningful fashion.
-.ie \nF \{\
-. de IX
-. tm Index:\\$1\t\\n%\t"\\$2"
+.\"
+.\" Avoid warning from groff about undefined register 'F'.
+.de IX
..
-. nr % 0
-. rr F
-.\}
-.el \{\
-. de IX
+.nr rF 0
+.if \n(.g .if rF .nr rF 1
+.if (\n(rF:(\n(.g==0)) \{\
+. if \nF \{\
+. de IX
+. tm Index:\\$1\t\\n%\t"\\$2"
..
+. if !\nF==2 \{\
+. nr % 0
+. nr F 2
+. \}
+. \}
.\}
+.rr rF
.\"
.\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2).
.\" Fear. Run. Save yourself. No user-serviceable parts.
@@ -124,7 +133,7 @@
.\" ========================================================================
.\"
.IX Title "PERLTEX 1"
-.TH PERLTEX 1 "2010-07-10" "v2.1" " "
+.TH PERLTEX 1 "2019-09-15" "v2.2" " "
.\" For nroff, turn off justification. Always turn off hyphenation; it makes
.\" way too many mistakes in technical documents.
.if n .ad l
@@ -240,7 +249,7 @@
Specify the filename of the LaTeX compiler. The LaTeX compiler
defaults to ``\f(CW\*(C`latex\*(C'\fR''. The \f(CW\*(C`PERLTEX\*(C'\fR environment variable
overrides this default, and the \fB\-\-latex\fR command-line option (see
-\&\*(L"\s-1OPTIONS\s0\*(R") overrides that.
+\&\*(L"\s-1OPTIONS\*(R"\s0) overrides that.
.SH "FILES"
.IX Header "FILES"
While compiling \fIjobname.tex\fR, \fBperltex\fR makes use of the following
@@ -274,7 +283,7 @@
\&\fBperltex\fR's sandbox defaults to what Opcode calls ``\f(CW\*(C`:browse\*(C'\fR''.
.SH "SEE ALSO"
.IX Header "SEE ALSO"
-\&\fIlatex\fR\|(1), \fIpdflatex\fR\|(1), \fIperl\fR\|(1), \fISafe\fR\|(3pm), \fIOpcode\fR\|(3pm)
+\&\fBlatex\fR\|(1), \fBpdflatex\fR\|(1), \fBperl\fR\|(1), \fBSafe\fR\|(3pm), \fBOpcode\fR\|(3pm)
.SH "AUTHOR"
.IX Header "AUTHOR"
Scott Pakin, \fIscott+pt at pakin.org\fR
Modified: trunk/Master/texmf-dist/doc/man/man1/perltex.man1.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/scripts/perltex/perltex.pl
===================================================================
--- trunk/Master/texmf-dist/scripts/perltex/perltex.pl 2019-09-23 20:58:04 UTC (rev 52161)
+++ trunk/Master/texmf-dist/scripts/perltex/perltex.pl 2019-09-23 20:58:21 UTC (rev 52162)
@@ -15,7 +15,7 @@
#
# This is a generated file.
#
-# Copyright (C) 2010 Scott Pakin <scott+pt at pakin.org>
+# Copyright (C) 2003-2019 Scott Pakin <scott+pt at pakin.org>
#
# This file may be distributed and/or modified under the conditions
# of the LaTeX Project Public License, either version 1.3c of this
Modified: trunk/Master/texmf-dist/source/latex/perltex/perltex.dtx
===================================================================
--- trunk/Master/texmf-dist/source/latex/perltex/perltex.dtx 2019-09-23 20:58:04 UTC (rev 52161)
+++ trunk/Master/texmf-dist/source/latex/perltex/perltex.dtx 2019-09-23 20:58:21 UTC (rev 52162)
@@ -1,7 +1,7 @@
% \iffalse meta-comment
%
-% Copyright (C) 2010 Scott Pakin <scott+pt at pakin.org>
-% ---------------------------------------------------
+% Copyright (C) 2003-2019 Scott Pakin <scott+pt at pakin.org>
+% --------------------------------------------------------
%
% This file may be distributed and/or modified under the conditions of
% the LaTeX Project Public License, either version 1.3c of this license
@@ -22,7 +22,7 @@
%<package>\NeedsTeXFormat{LaTeX2e}[1999/12/01]
%<package>\ProvidesPackage{perltex}
%<*package>
- [2010/07/10 v2.1 LaTeX macros for use with PerlTeX]
+ [2019/09/14 v2.2 LaTeX macros for use with PerlTeX]
%</package>
%
%<*driver>
@@ -41,17 +41,15 @@
\usepackage{flafter}
\usepackage{textcomp}
\usepackage{graphicx}
-\IfFileExists{hyperref.sty}{%
- \usepackage{hyperref}
- \hypersetup{%
- hyperindex=false,
- bookmarksopen,
- pdftitle={PerlTeX: Defining LaTeX macros in terms of Perl code},
- pdfauthor={Scott Pakin, scott+pt at pakin.org},
- pdfsubject={Using Perl to define LaTeX macros},
- pdfkeywords={programming, LaTeX, macros, Perl}
- }
-}{}
+\usepackage{hyperref}
+\hypersetup{%
+ hyperindex=false,
+ bookmarksopen,
+ pdftitle={PerlTeX: Defining LaTeX macros in terms of Perl code},
+ pdfauthor={Scott Pakin, scott+pt at pakin.org},
+ pdfsubject={Using Perl to define LaTeX macros},
+ pdfkeywords={programming, LaTeX, macros, Perl}
+}
\EnableCrossrefs
\CodelineIndex
\RecordChanges
@@ -62,7 +60,7 @@
%</driver>
% \fi
%
-% \CheckSum{602}
+% \CheckSum{605}
%
% \CharacterTable
% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
@@ -921,7 +919,7 @@
% \section{License agreement}
% \label{sec:license}
%
-% Copyright \textcopyright{} 2010 Scott Pakin \texttt{<scott+pt at pakin.org>}
+% Copyright \textcopyright{} 2003--2019 Scott Pakin \texttt{<scott+pt at pakin.org>}
%
% \providecommand{\url}[1]{\texttt{##1}}
%
@@ -943,9 +941,11 @@
% final draft; to Andrei Alexandrescu for providing a few bug fixes; to
% Nick Andrewes for identifying and helping diagnose a problem running
% \PerlTeX\ with \XeTeX\ and to Jonathan Kew for suggesting a
-% workaround; and to Linus K\"allberg for reporting and helping diagnose
-% some problems with running \PerlTeX\ on Windows. Also, thanks to the
-% many people who have sent me fan mail or submitted bug reports,
+% workaround; to Linus K\"allberg for reporting and helping diagnose
+% some problems with running \PerlTeX\ on Windows; and to Ulrike Fischer
+% for reporting and helping correct a bug encountered when using
+% \noperlmac\ with newer versions of \LaTeX\@. Also, thanks to the many
+% people who have sent me fan mail or submitted bug reports,
% documentation corrections, or feature requests. (The
% \texttt{\string\perldo} macro and the \texttt{--makesty} option were
% particularly popular requests.)
@@ -1049,8 +1049,10 @@
% option to suppress the ``must be compiled using perltex'' error
% message}
% \begin{macrocode}
-\newif\ifplmac at required \plmac at requiredtrue
-\DeclareOption{optional}{\plmac at requiredfalse} \ProcessOptions\relax
+\newif\ifplmac at required
+\plmac at requiredtrue
+\DeclareOption{optional}{\plmac at requiredfalse}
+\ProcessOptions\relax
% \end{macrocode}
% \end{macro}
% \end{macro}
@@ -1109,10 +1111,14 @@
% not defined, \perlmac{} gives an error message and---as we shall see
% on page~\pageref{page:define-dummies}---defines dummy versions of
% |\perl|[|re|]|newcommand| and |\perl|[|re|]|newenvironment|.
+% \changes{v2.2}{2019/09/14}{Let-bind \cs{plmac at tag} to \cs{relax} if
+% \cs{plmac at tag} is undefined. This corrects a problem when
+% \noexpand\texttt{noperltex} is used with newer versions of
+% \noexpand\LaTeX}
% \begin{macrocode}
\newif\ifperl
\perltrue
-\@ifundefined{plmac at tag}{\perlfalse}{}
+\@ifundefined{plmac at tag}{\perlfalse\let\plmac at tag=\relax}{}
\@ifundefined{plmac at tofile}{\perlfalse}{}
\@ifundefined{plmac at fromfile}{\perlfalse}{}
\@ifundefined{plmac at toflag}{\perlfalse}{}
@@ -2145,7 +2151,7 @@
#
# This is a generated file.
#
-# Copyright (C) 2010 Scott Pakin <scott+pt at pakin.org>
+# Copyright (C) 2003-2019 Scott Pakin <scott+pt at pakin.org>
#
# This file may be distributed and/or modified under the conditions
# of the LaTeX Project Public License, either version 1.3c of this
Modified: trunk/Master/texmf-dist/source/latex/perltex/perltex.ins
===================================================================
--- trunk/Master/texmf-dist/source/latex/perltex/perltex.ins 2019-09-23 20:58:04 UTC (rev 52161)
+++ trunk/Master/texmf-dist/source/latex/perltex/perltex.ins 2019-09-23 20:58:21 UTC (rev 52162)
@@ -1,5 +1,5 @@
%%
-%% Copyright (C) 2010 Scott Pakin <scott+pt at pakin.org>
+%% Copyright (C) 2003--2019 Scott Pakin <scott+pt at pakin.org>
%%
%% This file may be distributed and/or modified under the conditions of
%% the LaTeX Project Public License, either version 1.3c of this license
@@ -21,7 +21,7 @@
This is a generated file.
-Copyright (C) 2010 Scott Pakin <scott+pt at pakin.org>
+Copyright (C) 2003-2019 Scott Pakin <scott+pt at pakin.org>
This file may be distributed and/or modified under the conditions of
the LaTeX Project Public License, either version 1.3c of this license
Modified: trunk/Master/texmf-dist/tex/latex/perltex/perltex.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/perltex/perltex.sty 2019-09-23 20:58:04 UTC (rev 52161)
+++ trunk/Master/texmf-dist/tex/latex/perltex/perltex.sty 2019-09-23 20:58:21 UTC (rev 52162)
@@ -8,7 +8,7 @@
%%
%% This is a generated file.
%%
-%% Copyright (C) 2010 Scott Pakin <scott+pt at pakin.org>
+%% Copyright (C) 2003-2019 Scott Pakin <scott+pt at pakin.org>
%%
%% This file may be distributed and/or modified under the conditions of
%% the LaTeX Project Public License, either version 1.3c of this license
@@ -22,12 +22,14 @@
%%
\NeedsTeXFormat{LaTeX2e}[1999/12/01]
\ProvidesPackage{perltex}
- [2010/07/10 v2.1 LaTeX macros for use with PerlTeX]
-\newif\ifplmac at required \plmac at requiredtrue
-\DeclareOption{optional}{\plmac at requiredfalse} \ProcessOptions\relax
+ [2019/09/14 v2.2 LaTeX macros for use with PerlTeX]
+\newif\ifplmac at required
+\plmac at requiredtrue
+\DeclareOption{optional}{\plmac at requiredfalse}
+\ProcessOptions\relax
\newif\ifperl
\perltrue
-\@ifundefined{plmac at tag}{\perlfalse}{}
+\@ifundefined{plmac at tag}{\perlfalse\let\plmac at tag=\relax}{}
\@ifundefined{plmac at tofile}{\perlfalse}{}
\@ifundefined{plmac at fromfile}{\perlfalse}{}
\@ifundefined{plmac at toflag}{\perlfalse}{}
More information about the tex-live-commits
mailing list