From ef177854fd1cd66e7f23f88bb169a992e80d1453 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Mon, 18 May 1998 03:04:27 +0000
Subject: [PATCH] Fix pagination.

---
 v7/src/sf/pardec.scm | 6 +++---
 v7/src/sf/pthmap.scm | 4 ++--
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/v7/src/sf/pardec.scm b/v7/src/sf/pardec.scm
index f64d3a1fa..14c9e6ec7 100644
--- a/v7/src/sf/pardec.scm
+++ b/v7/src/sf/pardec.scm
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: pardec.scm,v 4.9 1993/09/01 00:10:24 cph Exp $
+$Id: pardec.scm,v 4.10 1998/05/18 03:03:50 cph Exp $
 
-Copyright (c) 1988-1993 Massachusetts Institute of Technology
+Copyright (c) 1988-98 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -258,7 +258,7 @@ MIT in each case. |#
 		      (list
 		       (make-declaration operation
 					 (if (symbol? name)
-					     (block/lookup-name block name true)
+					     (block/lookup-name block name #t)
 					     name)
 					 (make-integration-info
 					  (copy/expression/extern block value))
diff --git a/v7/src/sf/pthmap.scm b/v7/src/sf/pthmap.scm
index 28ef1e7ac..079a2f857 100644
--- a/v7/src/sf/pthmap.scm
+++ b/v7/src/sf/pthmap.scm
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/sf/pthmap.scm,v 4.3 1995/07/12 19:43:43 adams Exp $
+$Id: pthmap.scm,v 4.4 1998/05/18 03:04:27 cph Exp $
 
-Copyright (c) 1987-1995 Massachusetts Institute of Technology
+Copyright (c) 1987-98 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
-- 
2.25.1