diff options
Diffstat (limited to 'Master')
-rw-r--r-- | Master/texmf-dist/doc/man/man1/sty2dtx.1 | 54 | ||||
-rw-r--r-- | Master/texmf-dist/doc/man/man1/sty2dtx.man1.pdf | bin | 9162 -> 30494 bytes | |||
-rw-r--r-- | Master/texmf-dist/doc/support/sty2dtx/README.txt (renamed from Master/texmf-dist/doc/support/sty2dtx/README) | 15 | ||||
-rw-r--r-- | Master/texmf-dist/doc/support/sty2dtx/sty2dtx.pdf | bin | 140340 -> 156538 bytes | |||
-rwxr-xr-x | Master/texmf-dist/scripts/sty2dtx/sty2dtx.pl | 35 |
5 files changed, 68 insertions, 36 deletions
diff --git a/Master/texmf-dist/doc/man/man1/sty2dtx.1 b/Master/texmf-dist/doc/man/man1/sty2dtx.1 index 692dad8320e..e63d5e3e41e 100644 --- a/Master/texmf-dist/doc/man/man1/sty2dtx.1 +++ b/Master/texmf-dist/doc/man/man1/sty2dtx.1 @@ -1,4 +1,4 @@ -.\" Automatically generated by Pod::Man 2.25 (Pod::Simple 3.16) +.\" Automatically generated by Pod::Man 4.11 (Pod::Simple 3.35) .\" .\" Standard preamble: .\" ======================================================================== @@ -38,27 +38,36 @@ . ds PI \(*p . ds L" `` . ds R" '' +. ds C` +. ds C' 'br\} .\" .\" Escape single quotes in literal strings from groff's Unicode transform. .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 "STY2DTX 1" -.TH STY2DTX 1 "2012-11-07" "perl v5.14.2" "User Contributed Perl Documentation" +.TH STY2DTX 1 "2022-10-18" "perl v5.30.0" "User Contributed Perl Documentation" .\" For nroff, turn off justification. Always turn off hyphenation; it makes .\" way too many mistakes in technical documents. .if n .ad l @@ -133,10 +142,17 @@ sty2dtx \-\- Converts a LaTeX .sty file to a documented .dtx file .SH "VERSION" .IX Header "VERSION" -Version: v2.3 +Version: v2.4 \- 2022/10/18 +.SH "LINKS" +.IX Header "LINKS" +\&\s-1CTAN:\s0 https://ctan.org/pkg/sty2dtx +.PP +Repository: https://github.com/MartinScharrer/sty2dtx +.PP +Issues: https://github.com/MartinScharrer/sty2dtx/issues .SH "COPYRIGHT" .IX Header "COPYRIGHT" -Copyright (c) 2010\-2012 Martin Scharrer <martin@scharrer\-online.de> +Copyright (c) 2010\-2022 Martin Scharrer <martin.scharrer@web.de> .PP This program is free software: you can redistribute it and/or modify it under the terms of the \s-1GNU\s0 General Public License as published by @@ -144,12 +160,12 @@ the Free Software Foundation, either version 3 of the License, or (at your option) any later version. .PP This program is distributed in the hope that it will be useful, -but \s-1WITHOUT\s0 \s-1ANY\s0 \s-1WARRANTY\s0; without even the implied warranty of -\&\s-1MERCHANTABILITY\s0 or \s-1FITNESS\s0 \s-1FOR\s0 A \s-1PARTICULAR\s0 \s-1PURPOSE\s0. See the +but \s-1WITHOUT ANY WARRANTY\s0; without even the implied warranty of +\&\s-1MERCHANTABILITY\s0 or \s-1FITNESS FOR A PARTICULAR PURPOSE.\s0 See the \&\s-1GNU\s0 General Public License for more details. .PP You should have received a copy of the \s-1GNU\s0 General Public License -along with this program. If not, see <http://www.gnu.org/licenses/>. +along with this program. If not, see <https://www.gnu.org/licenses/>. .SH "DESCRIPTION" .IX Header "DESCRIPTION" Converts a .sty file (LaTeX package) to .dtx format (documented LaTeX source), @@ -204,7 +220,7 @@ a '\f(CW\*(C`}\*(C'\fR' on its own on a line. .SS "Files" .IX Subsection "Files" .IP "\(bu" 2 -can be '\f(CW\*(C`\-\*(C'\fR' for \s-1STDIN\s0 or \s-1STDOUT\s0, which is the default if no files are given +can be '\f(CW\*(C`\-\*(C'\fR' for \s-1STDIN\s0 or \s-1STDOUT,\s0 which is the default if no files are given .IP "\(bu" 2 multiple input files are merged to one output file .SS "Variables" @@ -335,6 +351,6 @@ Produce \s-1DTX\s0 file for a class: .IX Header "AUTHOR" Martin Scharrer .PP -E\-mail: martin@scharrer\-online.de +E\-mail: martin.scharrer@web.de .PP -\&\s-1WWW:\s0 http://www.scharrer\-online.de <http://www.scharrer-online.de> +\&\s-1WWW:\s0 <http://www.scharrer\-online.de> diff --git a/Master/texmf-dist/doc/man/man1/sty2dtx.man1.pdf b/Master/texmf-dist/doc/man/man1/sty2dtx.man1.pdf Binary files differindex 962b7ebefaf..fe21f3e7206 100644 --- a/Master/texmf-dist/doc/man/man1/sty2dtx.man1.pdf +++ b/Master/texmf-dist/doc/man/man1/sty2dtx.man1.pdf diff --git a/Master/texmf-dist/doc/support/sty2dtx/README b/Master/texmf-dist/doc/support/sty2dtx/README.txt index 96bed0f02c7..6b5d1a69225 100644 --- a/Master/texmf-dist/doc/support/sty2dtx/README +++ b/Master/texmf-dist/doc/support/sty2dtx/README.txt @@ -2,10 +2,17 @@ NAME sty2dtx -- Converts a LaTeX .sty file to a documented .dtx file VERSION - Version: v2.3 + Version: v2.4 - 2022/10/18 + +LINKS + CTAN: https://ctan.org/pkg/sty2dtx + + Repository: https://github.com/MartinScharrer/sty2dtx + + Issues: https://github.com/MartinScharrer/sty2dtx/issues COPYRIGHT - Copyright (c) 2010-2012 Martin Scharrer <martin@scharrer-online.de> + Copyright (c) 2010-2022 Martin Scharrer <martin.scharrer@web.de> This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the @@ -18,7 +25,7 @@ COPYRIGHT Public License for more details. You should have received a copy of the GNU General Public License along - with this program. If not, see <http://www.gnu.org/licenses/>. + with this program. If not, see <https://www.gnu.org/licenses/>. DESCRIPTION Converts a .sty file (LaTeX package) to .dtx format (documented LaTeX @@ -149,7 +156,7 @@ Examples AUTHOR Martin Scharrer - E-mail: martin@scharrer-online.de + E-mail: martin.scharrer@web.de WWW: <http://www.scharrer-online.de> diff --git a/Master/texmf-dist/doc/support/sty2dtx/sty2dtx.pdf b/Master/texmf-dist/doc/support/sty2dtx/sty2dtx.pdf Binary files differindex 57ecc28b3bf..14610279ea0 100644 --- a/Master/texmf-dist/doc/support/sty2dtx/sty2dtx.pdf +++ b/Master/texmf-dist/doc/support/sty2dtx/sty2dtx.pdf diff --git a/Master/texmf-dist/scripts/sty2dtx/sty2dtx.pl b/Master/texmf-dist/scripts/sty2dtx/sty2dtx.pl index e68b667141c..7feb7951baf 100755 --- a/Master/texmf-dist/scripts/sty2dtx/sty2dtx.pl +++ b/Master/texmf-dist/scripts/sty2dtx/sty2dtx.pl @@ -9,11 +9,19 @@ sty2dtx -- Converts a LaTeX .sty file to a documented .dtx file =head1 VERSION -Version: v2.3 +Version: v2.4 - 2022/10/18 + +=head1 LINKS + +CTAN: https://ctan.org/pkg/sty2dtx + +Repository: https://github.com/MartinScharrer/sty2dtx + +Issues: https://github.com/MartinScharrer/sty2dtx/issues =head1 COPYRIGHT -Copyright (c) 2010-2012 Martin Scharrer <martin@scharrer-online.de> +Copyright (c) 2010-2022 Martin Scharrer <martin.scharrer@web.de> This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -26,7 +34,7 @@ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License -along with this program. If not, see <http://www.gnu.org/licenses/>. +along with this program. If not, see <https://www.gnu.org/licenses/>. =head1 DESCRIPTION @@ -220,7 +228,7 @@ Produce DTX file for a class: Martin Scharrer -E-mail: L<martin@scharrer-online.de> +E-mail: L<martin.scharrer@web.de> WWW: L<http://www.scharrer-online.de> @@ -229,7 +237,7 @@ WWW: L<http://www.scharrer-online.de> ################################################################################ use Pod::Usage; -my $VERSION = "v2.3"; +my $VERSION = "v2.4"; $VERSION =~ tr/-/\//; my $TITLE = << "EOT"; @@ -329,11 +337,11 @@ my $rmacrodef = qr/ ) \\( [gex]?def \s* \\ # TeX definitions - | (?:new|renew|provide)command\s* \*? \s* {? \s* \\ # LaTeX definitions - | \@namedef{? # Definition by name only + | (?:new|renew|provide)command\s* \*? \s* \{? \s* \\ # LaTeX definitions + | \@namedef\{? # Definition by name only ) ($rmacroname) # Macro name without backslash - \s* }? # Potential closing brace + \s* \}? # Potential closing brace (.*) # Rest of line /xms; @@ -342,19 +350,19 @@ my $rkeydef = qr/ \\ (define\@[a-z]*key) \s* - {([^}]+)} # Key family + \{([^}]+)\} # Key family \s* - {([^}]+)} # Key name + \{([^}]+)\} # Key name (.*) # Rest of line /xms; my $renvdef = qr/ ^ # Begin of line (no whitespaces!) \\( - (?:new|renew|provide)environment\s* { \s* # LaTeX definitions + (?:new|renew|provide)environment\s* \{ \s* # LaTeX definitions ) ($renvname) # Environment names follow same rules as macro names - \s* } # closing brace + \s* \} # closing brace (.*) # Rest of line /xms; @@ -378,6 +386,7 @@ sub close_environment { } my ( $mday, $mon, $year ) = ( localtime(time) )[ 3 .. 5 ]; +$mday = sprintf( "%02d", $mday ); $mon = sprintf( "%02d", $mon + 1 ); $year += 1900; @@ -748,7 +757,7 @@ while (<>) { # Real comments are either: 1) starting with a '%' at SOL or 2) are followed # by at least one whitespace. This exclude (most) commented out code. elsif (/^%|^\s*%\s/) { - if (!$removeenvs || !/^%\s+\\(?:begin|end){(?:macro|environment|macrocode|key)}/) { + if (!$removeenvs || !/^%\s+\\(?:begin|end)\{(?:macro|environment|macrocode|key)\}/) { $_ =~ s/^\s*//; if ($comments || !/^%\s*$/){ $comments .= $_; |