Released 0.2

[ucwmac.git] / ucw-verb.tex

diff --git a/ucw-verb.tex b/ucw-verb.tex
index 2b9890972e8a7c6cc4112493741862e246aa12bf..b218307f3535f0e0bdaf59eec943d76a02831de4 100644 (file)
--- a/ucw-verb.tex
+++ b/ucw-verb.tex
@@ -9,7 +9,7 @@
 \def\frenchsp@cing{\sfcode`\.\@m \sfcode`\?\@m \sfcode`\!\@m%
 \sfcode`\:\@m \sfcode`\;\@m \sfcode`\,\@m}
 
-% Typesetting of one verbatim word: |word|
+% Typesetting of one verbatim word: |word| (enable by \inlineverbon)
 
 % Set if spaces should be rendered as "bath-tub" glyphs
 \newif\ifshowspaces
@@ -28,9 +28,11 @@
 \gdef\showsp@ces{\ifshowspaces\let =\sp@ce\fi}
 \global\let =\ }
 
-\catcode124=\active % Make | active
-\def\ttst@rt{\begingroup\setverb@tim\let|=\endgroup}
-\let|=\ttst@rt
+{\catcode124=\active % Make | active
+\gdef\ttst@rt{\begingroup\setverb@tim\let|=\endgroup}
+\gdef\inlineverbon{\catcode124=\active\let|=\ttst@rt}
+\gdef\inlineverboff{\catcode124=12}
+}
 
 % Typesetting of verbatim blocks:
 %      - the block is enclosed in balanced {}'s