From 1c64c2949b5e7ee64bfcc00169a991109ccadb94 Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Fri, 30 Dec 2005 14:58:20 +0000
Subject: [PATCH] fixed pr 7784

svn: r1715
---
 collects/help/bug-report.ss | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/collects/help/bug-report.ss b/collects/help/bug-report.ss
index 86aa9fbe60..f2186d0223 100644
--- a/collects/help/bug-report.ss
+++ b/collects/help/bug-report.ss
@@ -212,8 +212,12 @@
                 (let* ([text (new (editor:standard-style-list-mixin
 				   (editor:keymap-mixin
 				    text:basic%)))]
-                       [canvas (make-object canvas:basic% panel text)])
+                       [canvas (new canvas:basic% 
+                                    (style '(hide-hscroll))
+                                    (parent panel) 
+                                    (editor text))])
                   (send text set-paste-text-only #t)
+                  (send text auto-wrap #t)
                   (send text set-styles-fixed #t)
                   canvas))
               #t