From 767ecdf9f8bf810a380905b1641e0973c40fac2f Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Mon, 10 Jan 2000 03:42:30 +0000
Subject: [PATCH] Move another call to newline.

---
 v7/src/edwin/edwin.sf | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/v7/src/edwin/edwin.sf b/v7/src/edwin/edwin.sf
index ccb8d33db..994420f8a 100644
--- a/v7/src/edwin/edwin.sf
+++ b/v7/src/edwin/edwin.sf
@@ -1,8 +1,8 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: edwin.sf,v 1.21 1999/12/22 02:48:37 cph Exp $
+;;; $Id: edwin.sf,v 1.22 2000/01/10 03:42:30 cph Exp $
 ;;;
-;;; Copyright (c) 1991-1999 Massachusetts Institute of Technology
+;;; Copyright (c) 1991-2000 Massachusetts Institute of Technology
 ;;;
 ;;; This program is free software; you can redistribute it and/or
 ;;; modify it under the terms of the GNU General Public License as
@@ -63,8 +63,9 @@
        (let ((syntax-table
 	      (access class-syntax-table (->environment '(EDWIN)))))
 	 (lambda (filename)
-	   (write-string "\nPre-loading class definitions from ")
+	   (write-string "Pre-loading class definitions from ")
 	   (write filename)
+	   (newline)
 	   (syntax* (read-file (string-append filename ".scm"))
 		    syntax-table)
 	   (write-string " -- done")))))
-- 
2.25.1