[tex-eplain] Problem with \pageref{

[Stepan Kasal]

Hello,

On Tue, Sep 21, 2004 at 02:55:15PM -0400, John Culleton wrote:
> OK I downloaded 2.8.4 with creation date of Sep 5, 2004, [...]
> \def^^L{\par}%

the attached patch also fixes your problem.

Dorai, do you like it?
(I have also fixed a typo in the ChangeLog.)

Stepan
-------------- next part --------------
2004-09-22  Stepan Kasal  <kasal at ucw.cz>

	* xeplain.tex (^^L): Remove the redefinition.
	(\@setuplisting): Fix the def in the case that ^^L is not active.

diff -urpaN eplain-2.8.4/xeplain.tex eplain-2.8.4/xeplain.tex
--- eplain-2.8.4/xeplain.tex	2004-08-31 22:40:15.000000000 +0200
+++ eplain-2.8.4/xeplain.tex	2004-09-22 11:38:35.243928407 +0200
@@ -181,12 +181,6 @@
   \gdef\percentchar[%]\endgroup
 %
 % 
-% In order to do anything with ^^L inside a macro, it must
-% be made non-\outer.
-% 
-\def^^L{\par}%
-%
-% 
 % Leave horizontal mode (if we're in it), then insert a penalty.
 % And conversely.
 % 
@@ -1182,17 +1176,23 @@
 % 
 % \uncatcodespecials must come before \obeywhitespace, lest a space
 % character in the input produce character 32 from the \tt font.
+% Ensure ^^L is active and non-outer.
 % 
-\def\listingfont{\tt}%
-\def\@setuplisting{%
-   \uncatcodespecials
-   \obeywhitespace
-   \makeactive\`
-   \makeactive\^^I
-   \def^^L{\vfill\break}%
-   \parskip = 0pt
-   \listingfont
+{%
+  \makeactive\^^L
+  \let^^L = \relax
+  \gdef\@setuplisting{%
+     \uncatcodespecials
+     \obeywhitespace
+     \makeactive\`
+     \makeactive\^^I
+     \makeactive\^^L
+     \def^^L{\vfill\break}%
+     \parskip = 0pt
+     \listingfont
+  }%
 }%
+\def\listingfont{\tt}%
 %
 % Give definitions to the characters we want to be special.
 % 
diff -urpaN eplain-2.8.4/ChangeLog eplain-2.8.4/ChangeLog
--- eplain-2.8.4/ChangeLog	2004-09-06 02:45:42.000000000 +0200
+++ eplain-2.8.4/ChangeLog	2004-09-22 11:57:01.413674836 +0200
@@ -17,7 +17,7 @@
         * xeplain.tex: \makecolumns.  Correct calculation of
         items-per-column
 
-2004-07-26  Stepan Kasal <kasal at ucw.cz>, Karl Berry <karal at freefriends.org>
+2004-07-26  Stepan Kasal <kasal at ucw.cz>, Karl Berry <karl at freefriends.org>
 
         * Version 2.8.3
         * README:  Fix URL