summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/optex/base/doc.opm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/optex/base/doc.opm')
-rw-r--r--Master/texmf-dist/tex/optex/base/doc.opm34
1 files changed, 18 insertions, 16 deletions
diff --git a/Master/texmf-dist/tex/optex/base/doc.opm b/Master/texmf-dist/tex/optex/base/doc.opm
index bde1dcc848f..dc5d037e72d 100644
--- a/Master/texmf-dist/tex/optex/base/doc.opm
+++ b/Master/texmf-dist/tex/optex/base/doc.opm
@@ -1,6 +1,6 @@
%% This is part of the OpTeX project, see http://petr.olsak.net/optex
-\_codedecl \printdoc {Macros for documentation printing <2022-07-01>} % loaded on demand by \load[doc]
+\_codedecl \printdoc {Macros for documentation printing <2022-11-21>} % loaded on demand by \load[doc]
\_doc -----------------------------
General decalarations.
@@ -11,8 +11,10 @@
\_let \mlinkcolor=\Red % main doc. points
\_let \ulinkcolor=\Blue % user doc. points
\_let \fnamecolor=\Brown % file names in listing headers
-\_def \bgverbcolor {\_setcmykcolor{0 0 .3 .03}} % background for listings
-\_hyperlinks \Green \Green
+\_def \bgverbcolor {\_setcmykcolor{0 0 .3 .03}} % background for listings
+\_def \outlinkcolor {\_setcmykcolor{1 0 1 .2}} % green for outerlinks
+\_def \inlinkcolor {\_setcmykcolor{0 1 0 .1}} % magenta for internal links
+\_hyperlinks \inlinkcolor \outlinkcolor
\_enlang
\_enquotes
@@ -39,7 +41,7 @@
\_doc -----------------------------
The listing mode is implemented here. The \`\maxlines`
is maximal lines of code printed in the listing mode.
- The \`\_catcodedot` sets dot as letter in listngs (for package
+ The \code{\\catcode`\\.=11} sets dot as letter in listngs (for package
documentation where `\.foo` sequeces exist).
\_cod -----------------------------
@@ -52,7 +54,7 @@
\_typosize[8/10]
\_let\_printverbline=\_printcodeline
\_ttline=\_inputlineno
- \_setverb \_catcodedot
+ \_setverb \_catcode`\.=11
\_ifnum\_ttline<0 \_let\_printverblinenum=\_relax \_else \_initverblinenum \_fi
\_adef{ }{\ }\_adef\^^I{\t}\_parindent=\_ttindent \_parskip=0pt
\_def\t{\_hskip \_dimexpr\_tabspaces em/2\_relax}%
@@ -74,7 +76,6 @@
\_edef\_Doc{\_asp\_asp\_bslash _doc}
\_bgroup \_lccode`~=`\^^I \_lowercase{\_egroup\_edef\_Doctab{\_noexpand~\_bslash _doc}}
\_edef\_Endcode{\_noexpand\_empty\_bslash _endcode}
-\_def\_catcodedot{\_catcode`\.=11 }
\_doc -----------------------------
The scanner of the control sequences in the listing mode replaces all
@@ -101,16 +102,16 @@
\_def\_processinput{%
\_let\_start=\_relax
\_ea\_replstring\_ea\_tmpb\_ea{\_aspace^^J}{^^J}
- \_addto\_tmpb{\_end}%
+ \_addto\_tmpb{\_fin}%
\_isinlist\_tmpb{\_start^^J}\_iftrue \_advance\_ttline by1\_fi
\_replstring\_tmpb{\_start^^J}{\_start}%
\_replstring\_tmpb{\_start}{}%
- \_replstring\_tmpb{^^J\_end}{\_end}%
- \_replstring\_tmpb{^^J\_end}{}%
- \_replstring\_tmpb{\_end}{}%
+ \_replstring\_tmpb{^^J\_fin}{\_fin}%
+ \_replstring\_tmpb{^^J\_fin}{}%
+ \_replstring\_tmpb{\_fin}{}%
\_ea\_prepareverbdata\_ea\_tmpb\_ea{\_tmpb^^J}%
\_replthis{\_csstring\\}{\_noexpand\_makecs}%
- \_ea\_printverb \_tmpb\_end
+ \_ea\_printverb \_tmpb\_fin
\_par
\_endgroup \_ttskip
\_isnextchar\_par{}{\_noindent}%
@@ -145,7 +146,7 @@
}
\_everytt={\_let\_printverblinenum=\_relax}
-\_long\_def\_endverbprinting#1\_end#2\_end{\_fi\_fi \_global\_maxlines=100000
+\_long\_def\_endverbprinting#1\_fin#2\_fin{\_fi\_fi \_global\_maxlines=100000
\_noindent\_typosize[8/]\_dots etc. (see {\_tt\fnamecolor\docfile})}
\_doc -----------------------------
@@ -206,10 +207,9 @@
catcodes using the `\_afteroad` macro.
\_cod -----------------------------
-\_def\_afterload{\_catcode`\<=13 \_catcode`\`=13 \_catcode`\.=11
- \_wlog {doc.opm: catcodes of < and ` activated, catcode of . is letter.}%
+\_def\_afterload{\_catcode`\<=13 \_catcode`\`=13
+ \_wlog {doc.opm: catcodes of < and ` activated.}%
}
-\_catcode`.=11
\_doc -----------------------------
The \code{<something>} will be print as <something>.
@@ -219,7 +219,7 @@
\_catcode`\<=13
\_def<#1>{$\langle\hbox{\it#1\/}\rangle$}
-\_everyintt{\_catcode`\<=13 }
+\_everyintt{\_catcode`\<=13 \_catcode`\.=11 }
\_doc -----------------------------
Main documentation points and hyperlinks to/from it.
@@ -357,6 +357,8 @@ have the same meaning: `\optexdoclink` in this example. And
\endinput
+2022-11-21 magenta color for internal links instead green.
+2022-11-13 \catcode`.=11: only local settings
2022-07-01 \_printii improved, colors declaration part added.
2021-05-15 \_endinput shifted after \_processinput when \_endcode is scanned.
2021-05-14 \_catcodedot, \_Doctab introduced.