From 7ae2b350fdcc86cdb52717b81bf6ad2736d9ba5c Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 25 Oct 2006 04:23:06 +0000
Subject: [PATCH] Fix typo in previous change.

---
 v7/src/runtime/port.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/v7/src/runtime/port.scm b/v7/src/runtime/port.scm
index f86725f3a..f1dc09a06 100644
--- a/v7/src/runtime/port.scm
+++ b/v7/src/runtime/port.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: port.scm,v 1.44 2006/10/25 03:15:22 cph Exp $
+$Id: port.scm,v 1.45 2006/10/25 04:23:06 cph Exp $
 
 Copyright 1991,1992,1993,1994,1997,1999 Massachusetts Institute of Technology
 Copyright 2001,2002,2003,2004,2005,2006 Massachusetts Institute of Technology
@@ -494,7 +494,7 @@ USA.
 		    (not (char=? (port/previous port) #\newline)))
 	       (write-char port #\newline)
 	       0)))
-	((LINE-START)
+	((LINE-START?)
 	 (lambda (port)
 	   (if (port/previous port)
 	       (char=? (port/previous port) #\newline)
-- 
2.25.1