X-Git-Url: https://git.distorted.org.uk/~mdw/mdwtools/blobdiff_plain/3a9729b4bec04949ba6bc505358ca10be105c0e0..bc0ae2eda4dc4b8e60d229300999c9cf07c59fee:/sverb.dtx

diff --git a/sverb.dtx b/sverb.dtx
index 144b2b5..e438813 100644
--- a/sverb.dtx
+++ b/sverb.dtx
@@ -6,20 +6,6 @@
 %
 % (c) 1996 Mark Wooding
 %
-%----- Revision history -----------------------------------------------------
-%
-% $Log: sverb.dtx,v $
-% Revision 1.2  2003/09/05 16:09:30  mdw
-% Make listing formatting more hookable.  Add colour support, and `splitverb'
-% environment.
-%
-% Revision 1.1  2002/02/03 20:49:03  mdw
-% Checkin for new build system.
-%
-% Revision 1.3  1996/11/19 21:01:18  mdw
-% Entered into RCS
-%
-%
 % \end{meta-comment}
 %
 % \begin{meta-comment} <general public licence>
@@ -58,7 +44,7 @@
 %<+split>                [2003/09/04 1.4 Verbatim, but with line breaking]
 % \end{meta-comment}
 %
-% \CheckSum{1009}
+% \CheckSum{1012}
 %% \CharacterTable
 %%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
 %%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
@@ -612,7 +598,7 @@
 %
 %    \begin{macrocode}
 \def\verbinput{\listinghook\@ifstar{\verbinput@\@input}{\verbinput@\input}}
-\def\verbinput@#1#2{%  
+\def\verbinput@#1#2{%
   \sv@startlisting%
   \setbox\z@\hbox\bgroup%
   #1{#2}%
@@ -743,9 +729,11 @@
 % expand to a space character which is not active.  Neat, huh?
 %
 %    \begin{macrocode}
+\begingroup
 \lccode`\~32
 \lccode`\!32
 \lowercase{%
+  \endgroup
   \def\@isspaces#1{%
     \ifx#1\relax%
       \def\@tempb{\@tempswafalse}%
@@ -912,7 +900,7 @@
 % If you say \syntax{"\\sv@readenv{"<macro-name>"}"}, it will expand do
 % \begin{listinglist} \listingsize \synshorts
 % <macro-name>"{\\"$_{12}$"end{"$_{12}$<current-env-name>"}"$_{12}$"}"^^A
-%		"{\\end{"<current-env-name>"}}"
+%               "{\\end{"<current-env-name>"}}"
 % \end{listinglist}
 % Easy, no?
 %
@@ -1194,7 +1182,7 @@
 %
 %    \begin{macrocode}
 \newcount\sv@nestcount
-\def\sv@demoname{demo\number\sv@nestcount.tmp}
+\def\sv@demoname{\jobname-demo\number\sv@nestcount.tmp}
 %    \end{macrocode}
 %
 % \end{macro}
@@ -1488,7 +1476,7 @@
 % whitespace on the line.
 %
 %    \begin{macrocode}
-\dimendef\svsplit@remain=1 
+\dimendef\svsplit@remain=1
 \dimendef\svsplit@indent=2
 %    \end{macrocode}
 %
@@ -1610,7 +1598,7 @@
 %    \end{macrocode}
 %
 % Otherwise it's a normal character.  If there's not enough space then force
-% a break.  
+% a break.
 %
 %    \begin{macrocode}
     \else%
