X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;f=ucw-verb.tex;h=a7b19730e145cf83893bec492fe74c0b1ec38f70;hb=refs%2Fheads%2Fmaster;hp=981aebefbb834fa4062d6e10a142aae038c30c3a;hpb=e51d2ddb736ea025de57c0d41f554438b2407b4d;p=ucwmac.git

diff --git a/ucw-verb.tex b/ucw-verb.tex
index 981aebe..a7b1973 100644
--- a/ucw-verb.tex
+++ b/ucw-verb.tex
@@ -2,6 +2,8 @@
 % Written by Martin Mares <mj@ucw.cz> in 2010 and placed into public domain
 % -------------------------------------------------------------------------
 
+\ucwdefmodule{verb}
+
 % We'll use internal macros of plain TeX
 \catcode`@=11
 
@@ -42,7 +44,7 @@
 
 \def\verb{\relax\def\sv@rb##1{\uccode`~=`##1%
 \uppercase{\catcode`~13\global\let~\endgroup}}%
-\begingroup\setverb@tim\sv@rb}
+\begingroup\setverb@tim\do\|\sv@rb}
 
 % Typesetting of verbatim blocks:
 %	- the block is enclosed in balanced {}'s
@@ -130,7 +132,7 @@
 
 % Input file verbatim
 
-\def\verbinput#1{\begingroup\v@rbparams\verblocaldefs\setupt@bs\startb@x\input #1 \egroup\endgroup}
+\def\verbinput#1{\begingroup\v@rbparams\verblocaldefs\setupt@bs\startb@x\input #1 \v@rbend}
 
 % Let's hide all internal macros
 \catcode`@=12