From dd3391c48526a7b108e28b251c64e0d2cc771752 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Fri, 18 Sep 1998 22:08:58 +0000
Subject: [PATCH] .

original commit: bcff7a654bcfe17132820647d5669907475653d1
---
 src/mred/wrap/mred.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/mred/wrap/mred.ss b/src/mred/wrap/mred.ss
index df7fcd79..e2061088 100644
--- a/src/mred/wrap/mred.ss
+++ b/src/mred/wrap/mred.ss
@@ -1007,7 +1007,7 @@
 		    get-active-canvas set-active-canvas
 		    get-canvas
 		    add-canvas remove-canvas
-		    auto-wrap))
+		    auto-wrap get-max-view-size))
 		    
 (define (make-editor-buffer% % can-wrap?)
   ; >>> This class is instantiated directly by the end-user <<<