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

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