suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

removed doc-installed from bug-reports

Browse Source 
svn: r8527
This commit is contained in:
Eli Barzilay 2008-02-04 18:12:53 +00:00
parent d78396aaf9
commit fb57b0df03
1 changed files with 0 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
collects/help/bug-report.ss
View File

@ -294,12 +294,6 @@
#f
synthesized-panel))
(define docs-installed
(make-big-text
(string-constant bug-report-field-docs-installed)
#t
synthesized-panel))
(define collections
(make-big-text
(string-constant bug-report-field-collections)
@ -354,9 +348,6 @@
(define (get-environment)
(string-append (send environment get-value)
"\n"
"Docs Installed:\n"
(format "~a" (send (send docs-installed get-editor) get-text))
"\n"
(format "Human Language: ~a\n" (send human-language get-value))
(format "(current-memory-use) ~a\n" (send memory-use get-value))
@ -519,7 +510,6 @@
(send memory-use set-value (format "~a" (current-memory-use)))
(send (send collections get-editor) auto-wrap #t)
(send (send docs-installed get-editor) auto-wrap #t)
;; Currently, the help-menu is left empty
(frame:remove-empty-menus bug-frame)
@ -527,10 +517,6 @@
(align-labels)
(switch-to-compose-view)
(send (send docs-installed get-editor) insert
(format "~s" (split-by-directories (find-doc-directories)
(get-doc-search-dirs))))
(send bug-frame show #t))
(define (ask-yes-or-no title msg parent)