fixed pr 7784

svn: r1715
2005-12-30 14:58:20 +00:00 · 2005-12-30 14:58:20 +00:00 · 1c64c2949b
commit 1c64c2949b
parent 9dfcc8a918
1 changed files with 5 additions and 1 deletions
--- 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