From 06201f6072284d49f2e08276da24f7b91cf8f527 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Tue, 27 Jul 2004 16:30:44 +0000
Subject: [PATCH] ,.

original commit: 9ed3977a62f40184050741245d2743f38badb0ba
---
 collects/mred/mred.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/mred/mred.ss b/collects/mred/mred.ss
index 4a325b12..937cd732 100644
--- a/collects/mred/mred.ss
+++ b/collects/mred/mred.ss
@@ -6231,7 +6231,7 @@
 	    (let loop ([scroll? #f])
 	      (let* ([e (make-object text%)]
 		     [c (make-object editor-canvas% msg-pnl e (if scroll?
-								  '(no-hscroll transparent)
+								  '(no-hscroll)
 								  '(no-hscroll no-vscroll transparent no-border)))])
 		(send c min-width 400)
 		(send c set-line-count 5)