texlive[64470] Master: pagegrid[.sty] (22sep22)

commits+karl at tug.org commits+karl at tug.org
Thu Sep 22 22:13:42 CEST 2022


Revision: 64470
          http://tug.org/svn/texlive?view=revision&revision=64470
Author:   karl
Date:     2022-09-22 22:13:42 +0200 (Thu, 22 Sep 2022)
Log Message:
-----------
pagegrid[.sty] (22sep22)

Modified Paths:
--------------
    trunk/Master/tlpkg/libexec/ctan2tds

Added Paths:
-----------
    trunk/Master/texmf-dist/tex/latex/pagegrid/
    trunk/Master/texmf-dist/tex/latex/pagegrid/pagegrid.sty

Added: trunk/Master/texmf-dist/tex/latex/pagegrid/pagegrid.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/pagegrid/pagegrid.sty	                        (rev 0)
+++ trunk/Master/texmf-dist/tex/latex/pagegrid/pagegrid.sty	2022-09-22 20:13:42 UTC (rev 64470)
@@ -0,0 +1,423 @@
+%%
+%% This is file `pagegrid.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% pagegrid.dtx  (with options: `package')
+%% 
+%% This is a generated file.
+%% 
+%% Project: pagegrid
+%% Version: 2022-09-21 v1.6
+%% 
+%% Copyright (C)
+%%    2009 Heiko Oberdiek
+%%    2016-2022 Oberdiek Package Support Group
+%% 
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either
+%% version 1.3c of this license or (at your option) any later
+%% version. This version of this license is in
+%%    https://www.latex-project.org/lppl/lppl-1-3c.txt
+%% and the latest version of this license is in
+%%    https://www.latex-project.org/lppl.txt
+%% and version 1.3 or later is part of all distributions of
+%% LaTeX version 2005/12/01 or later.
+%% 
+%% This work has the LPPL maintenance status "maintained".
+%% 
+%% The Current Maintainers of this work are
+%% Heiko Oberdiek and the Oberdiek Package Support Group
+%% https://github.com/ho-tex/pagegrid/issues
+%% 
+%% This work consists of the main source file pagegrid.dtx
+%% and the derived files
+%%    pagegrid.sty, pagegrid.pdf, pagegrid.ins, pagegrid.drv,
+%%    pagegrid-test1.tex.
+%% 
+\begingroup\catcode61\catcode48\catcode32=10\relax%
+  \catcode13=5 % ^^M
+  \endlinechar=13 %
+  \catcode35=6 % #
+  \catcode39=12 % '
+  \catcode44=12 % ,
+  \catcode45=12 % -
+  \catcode46=12 % .
+  \catcode58=12 % :
+  \catcode64=11 % @
+  \catcode123=1 % {
+  \catcode125=2 % }
+  \expandafter\let\expandafter\x\csname ver at pagegrid.sty\endcsname
+  \ifx\x\relax % plain-TeX, first loading
+  \else
+    \def\empty{}%
+    \ifx\x\empty % LaTeX, first loading,
+      % variable is initialized, but \ProvidesPackage not yet seen
+    \else
+      \expandafter\ifx\csname PackageInfo\endcsname\relax
+        \def\x#1#2{%
+          \immediate\write-1{Package #1 Info: #2.}%
+        }%
+      \else
+        \def\x#1#2{\PackageInfo{#1}{#2, stopped}}%
+      \fi
+      \x{pagegrid}{The package is already loaded}%
+      \aftergroup\endinput
+    \fi
+  \fi
+\endgroup%
+\begingroup\catcode61\catcode48\catcode32=10\relax%
+  \catcode13=5 % ^^M
+  \endlinechar=13 %
+  \catcode35=6 % #
+  \catcode39=12 % '
+  \catcode40=12 % (
+  \catcode41=12 % )
+  \catcode44=12 % ,
+  \catcode45=12 % -
+  \catcode46=12 % .
+  \catcode47=12 % /
+  \catcode58=12 % :
+  \catcode64=11 % @
+  \catcode91=12 % [
+  \catcode93=12 % ]
+  \catcode123=1 % {
+  \catcode125=2 % }
+  \expandafter\ifx\csname ProvidesPackage\endcsname\relax
+    \def\x#1#2#3[#4]{\endgroup
+      \immediate\write-1{Package: #3 #4}%
+      \xdef#1{#4}%
+    }%
+  \else
+    \def\x#1#2[#3]{\endgroup
+      #2[{#3}]%
+      \ifx#1\@undefined
+        \xdef#1{#3}%
+      \fi
+      \ifx#1\relax
+        \xdef#1{#3}%
+      \fi
+    }%
+  \fi
+\expandafter\x\csname ver at pagegrid.sty\endcsname
+\ProvidesPackage{pagegrid}%
+  [2022-09-21 v1.6 Print page grid in background (HO)]%
+\begingroup\catcode61\catcode48\catcode32=10\relax%
+  \catcode13=5 % ^^M
+  \endlinechar=13 %
+  \catcode123=1 % {
+  \catcode125=2 % }
+  \catcode64=11 % @
+  \def\x{\endgroup
+    \expandafter\edef\csname pagegrid at AtEnd\endcsname{%
+      \endlinechar=\the\endlinechar\relax
+      \catcode13=\the\catcode13\relax
+      \catcode32=\the\catcode32\relax
+      \catcode35=\the\catcode35\relax
+      \catcode61=\the\catcode61\relax
+      \catcode64=\the\catcode64\relax
+      \catcode123=\the\catcode123\relax
+      \catcode125=\the\catcode125\relax
+    }%
+  }%
+\x\catcode61\catcode48\catcode32=10\relax%
+\catcode13=5 % ^^M
+\endlinechar=13 %
+\catcode35=6 % #
+\catcode64=11 % @
+\catcode123=1 % {
+\catcode125=2 % }
+\def\TMP at EnsureCode#1#2{%
+  \edef\pagegrid at AtEnd{%
+    \pagegrid at AtEnd
+    \catcode#1=\the\catcode#1\relax
+  }%
+  \catcode#1=#2\relax
+}
+\TMP at EnsureCode{9}{10}% (tab)
+\TMP at EnsureCode{10}{12}% ^^J
+\TMP at EnsureCode{33}{12}% !
+\TMP at EnsureCode{34}{12}% "
+\TMP at EnsureCode{36}{3}% $
+\TMP at EnsureCode{38}{4}% &
+\TMP at EnsureCode{39}{12}% '
+\TMP at EnsureCode{40}{12}% (
+\TMP at EnsureCode{41}{12}% )
+\TMP at EnsureCode{42}{12}% *
+\TMP at EnsureCode{43}{12}% +
+\TMP at EnsureCode{44}{12}% ,
+\TMP at EnsureCode{45}{12}% -
+\TMP at EnsureCode{46}{12}% .
+\TMP at EnsureCode{47}{12}% /
+\TMP at EnsureCode{58}{12}% :
+\TMP at EnsureCode{59}{12}% ;
+\TMP at EnsureCode{60}{12}% <
+\TMP at EnsureCode{62}{12}% >
+\TMP at EnsureCode{63}{12}% ?
+\TMP at EnsureCode{91}{12}% [
+\TMP at EnsureCode{93}{12}% ]
+\TMP at EnsureCode{94}{7}% ^ (superscript)
+\TMP at EnsureCode{95}{8}% _ (subscript)
+\TMP at EnsureCode{96}{12}% `
+\TMP at EnsureCode{124}{12}% |
+\edef\pagegrid at AtEnd{\pagegrid at AtEnd\noexpand\endinput}
+\RequirePackage{tikz}
+\RequirePackage{atbegshi}[2009/12/02]
+\RequirePackage{kvoptions}[2009/07/17]
+\def\pagegrid at width{\paperwidth}%
+\def\pagegrid at height{\paperheight}%
+\@ifundefined{stockwidth}{}
+ {%
+   \ifdim \stockwidth > 0pt\relax
+    \ifdim \stockheight > 0pt \relax
+     \def\pagegrid at width{\stockwidth}%
+     \def\pagegrid at height{\stockheight}%
+    \fi
+   \fi
+ }
+\SetupKeyvalOptions{%
+  family=pagegrid,%
+  prefix=pagegrid@,%
+}
+\def\pagegrid at init{%
+  \let\pagegrid at origin@a\@empty
+  \let\pagegrid at origin@b\@empty
+  \let\pagegrid at init\relax
+}
+\let\pagegrid@@init\pagegrid at init
+\def\pagegrid at origin@a{bl}
+\def\pagegrid at origin@b{tr}
+\def\pagegrid at SetOrigin#1{%
+  \pagegrid at init
+  \ifx\pagegrid at origin@a\@empty
+    \def\pagegrid at origin@a{#1}%
+  \else
+    \ifx\pagegrid at origin@b\@empty
+    \else
+      \let\pagegrid at origin@a\pagegrid at origin@b
+    \fi
+    \def\pagegrid at origin@b{#1}%
+  \fi
+}
+\def\pagegrid at temp#1{%
+  \DeclareVoidOption{#1}{\pagegrid at SetOrigin{#1}}%
+  \@namedef{pagegrid at N@#1}{#1}%
+}
+\pagegrid at temp{bl}
+\pagegrid at temp{br}
+\pagegrid at temp{tl}
+\pagegrid at temp{tr}
+\def\pagegrid at temp#1#2{%
+  \DeclareVoidOption{#2}{\pagegrid at SetOrigin{#1}}%
+}%
+\pagegrid at temp{bl}{lb}
+\pagegrid at temp{br}{rb}
+\pagegrid at temp{tl}{lt}
+\pagegrid at temp{tr}{rt}
+\pagegrid at temp{bl}{bottom-left}
+\pagegrid at temp{br}{bottom-right}
+\pagegrid at temp{tl}{top-left}
+\pagegrid at temp{tr}{top-right}
+\pagegrid at temp{bl}{left-bottom}
+\pagegrid at temp{br}{right-bottom}
+\pagegrid at temp{tl}{left-top}
+\pagegrid at temp{tr}{right-top}
+\DeclareBoolOption[true]{enable}
+\DeclareComplementaryOption{disable}{enable}
+\DeclareBoolOption{foreground}
+\newlength{\pagegrid at step}
+\define at key{pagegrid}{step}{%
+  \setlength{\pagegrid at step}{#1}%
+}
+\DeclareStringOption[red]{firstcolor}
+\DeclareStringOption[blue]{secondcolor}
+\DeclareBoolOption[true]{arrows}
+\newlength\pagegrid at arrowlength
+\pagegrid at arrowlength=\z@
+\define at key{pagegrid}{arrowlength}{%
+  \setlength{\pagegrid at arrowlength}{#1}%
+}
+\define at key{pagegrid}{double}[true]{%
+  \@ifundefined{pagegrid at double@#1}{%
+    \PackageWarning{pagegrid}{%
+      Unsupported value `#1' for option `double'.\MessageBreak
+      Known values are:\MessageBreak
+      `false', `first', `last', `true'.\MessageBreak
+      Now `false' is used%
+    }%
+    \chardef\pagegrid at double\z@
+  }{%
+    \chardef\pagegrid at double\csname pagegrid at double@#1\endcsname\relax
+  }%
+}
+\@namedef{pagegrid at double@false}{0}
+\@namedef{pagegrid at double@first}{1}
+\@namedef{pagegrid at double@last}{2}
+\@namedef{pagegrid at double@true}{2}
+\chardef\pagegrid at double\z@
+\newcommand*{\pagegridsetup}{%
+  \let\pagegrid at init\pagegrid@@init
+  \setkeys{pagegrid}%
+}
+\pagegridsetup{%
+  step=1mm%
+}
+\InputIfFileExists{pagegrid.cfg}{}%
+\ProcessKeyvalOptions*\relax
+\AtBeginDocument{%
+  \ifdim\pagegrid at arrowlength>\z@
+  \else
+    \pagegrid at arrowlength=10\pagegrid at step
+  \fi
+}
+\def\pagegridShipoutDoubleBegin{%
+  \begingroup
+  \let\newlabel\@gobbletwo
+  \let\zref at newlabel\@gobbletwo
+  \let\@writefile\@gobbletwo
+  \let\select at language\@gobble
+}
+\def\pagegridShipoutDoubleEnd{%
+  \endgroup
+}
+\def\pagegrid at WriteDouble#1#2{%
+  \immediate\write#1{%
+    \@backslashchar csname %
+    pagegridShipoutDouble#2%
+    \@backslashchar endcsname%
+  }%
+}
+\def\pagegrid at ShipoutDouble#1{%
+  \begingroup
+    \if at filesw
+      \pagegrid at WriteDouble\@mainaux{Begin}%
+      \ifx\@auxout\@partaux
+        \pagegrid at WriteDouble\@partaux{Begin}%
+        \def\pagegrid at temp{%
+          \pagegrid at WriteDouble\@mainaux{End}%
+          \pagegrid at WriteDouble\@partaux{End}%
+        }%
+      \else
+        \def\pagegrid at temp{%
+          \pagegrid at WriteDouble\@mainaux{End}%
+        }%
+      \fi
+    \else
+      \def\pagegrid at temp{}%
+    \fi
+    \let\protect\noexpand
+    \AtBeginShipoutOriginalShipout\copy#1\relax
+    \pagegrid at temp
+  \endgroup
+}
+\AtBeginShipout{%
+  \ifdim\pagegrid at step>\z@
+  \else
+    \pagegrid at enablefalse
+  \fi
+  \ifpagegrid at enable
+    \ifnum\pagegrid at double=\@ne
+      \pagegrid at ShipoutDouble\AtBeginShipoutBox
+    \else
+      \ifnum\pagegrid at double=\tw@
+        \@ifundefined{pagegrid at DoubleBox}{%
+          \newbox\pagegrid at DoubleBox
+        }{}%
+        \setbox\pagegrid at DoubleBox=\copy\AtBeginShipoutBox
+      \fi
+    \fi
+    \ifpagegrid at foreground
+      \expandafter\AtBeginShipoutUpperLeftForeground
+    \else
+      \expandafter\AtBeginShipoutUpperLeft
+    \fi
+    {%
+      \put(0,0){%
+        \makebox(0,0)[lt]{%
+          \begin{tikzpicture}[%
+            bl/.style={},%
+            br/.style={xshift=\pagegrid at width,xscale=-1},%
+            tl/.style={yshift=\pagegrid at height,yscale=-1},%
+            tr/.style={xshift=\pagegrid at width,%
+                       yshift=\pagegrid at height,scale=-1}%
+          ]%
+            \useasboundingbox
+              (0mm,\pagegrid at height) rectangle (0mm,\pagegrid at height);%
+            \draw[%
+              \pagegrid at origin@a,%
+              step=\pagegrid at step,%
+              style=help lines,%
+              ultra thin%
+            ] (0mm,0mm) grid (\pagegrid at width,\pagegrid at height);%
+            \ifx\pagegrid at origin@b\@empty
+            \else
+              \draw[%
+                \pagegrid at origin@b,%
+                step=10\pagegrid at step,%
+                {\pagegrid at secondcolor},%
+                very thin%
+              ] (0mm,0mm) grid (\pagegrid at width,\pagegrid at height);%
+            \fi
+            \draw[%
+               \pagegrid at origin@a,%
+               step=10\pagegrid at step,%
+               {\pagegrid at firstcolor},%
+               very thin%
+            ] (0mm,0mm) grid (\pagegrid at width,\pagegrid at height);%
+            \ifx\pagegrid at origin@b\@empty
+            \else
+              \draw[%
+                \pagegrid at origin@b,%
+                step=50\pagegrid at step,%
+                {\pagegrid at secondcolor},%
+                thick%
+              ] (0mm,0mm) grid (\pagegrid at width,\pagegrid at height);%
+            \fi
+            \draw[%
+              \pagegrid at origin@a,%
+              step=50\pagegrid at step,%
+              {\pagegrid at firstcolor},%
+              thick%
+            ] (0mm,0mm) grid (\pagegrid at width,\pagegrid at height);%
+            \ifpagegrid at arrows
+              \ifx\pagegrid at origin@b\@empty
+              \else
+                \draw[%
+                  \pagegrid at origin@b,%
+                  {\pagegrid at secondcolor},%
+                  stroke,%
+                  line width=1pt,%
+                  line cap=round%
+                ] (0mm,0mm) %
+                -- (\pagegrid at arrowlength,\pagegrid at arrowlength) %
+                   (\pagegrid at arrowlength,.5\pagegrid at arrowlength) %
+                -- (\pagegrid at arrowlength,\pagegrid at arrowlength) %
+                -- (.5\pagegrid at arrowlength,\pagegrid at arrowlength);%
+              \fi
+              \draw[%
+                \pagegrid at origin@a,%
+                {\pagegrid at firstcolor},%
+                stroke,%
+                line width=1pt,%
+                line cap=round%
+              ] (0mm,0mm) %
+              -- (\pagegrid at arrowlength,\pagegrid at arrowlength) %
+                 (\pagegrid at arrowlength,.5\pagegrid at arrowlength) %
+              -- (\pagegrid at arrowlength,\pagegrid at arrowlength) %
+              -- (.5\pagegrid at arrowlength,\pagegrid at arrowlength);%
+            \fi
+          \end{tikzpicture}%
+        }%
+      }%
+    }%
+    \ifnum\pagegrid at double=\tw@
+      \pagegrid at ShipoutDouble\pagegrid at DoubleBox
+    \fi
+  \fi
+}
+\pagegrid at AtEnd%
+%% \section{Installation}
+\endinput
+%%
+%% End of file `pagegrid.sty'.


Property changes on: trunk/Master/texmf-dist/tex/latex/pagegrid/pagegrid.sty
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Modified: trunk/Master/tlpkg/libexec/ctan2tds
===================================================================
--- trunk/Master/tlpkg/libexec/ctan2tds	2022-09-22 20:13:05 UTC (rev 64469)
+++ trunk/Master/tlpkg/libexec/ctan2tds	2022-09-22 20:13:42 UTC (rev 64470)
@@ -3158,6 +3158,7 @@
  'penrose'	=> 'etex',
  'powerdot'	=> 'latex',
  'thumb'        => 'latex -translate-file=empty.tcx',   # no 8-bit
+ 'pagegrid'	=> 'etex',
  'pagesel'	=> 'tex',
  'pageslts'     => 'tex -translate-file=empty.tcx',     # no 8-bit
  'papermas'     => 'tex',



More information about the tex-live-commits mailing list.