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

removed dependency on test-suite

Browse Source 
svn: r5238
This commit is contained in:
Eli Barzilay 2007-01-07 03:44:26 +00:00
parent d3f0e20191
commit 33ac0ea439
1 changed files with 1 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
collects/handin-client/client-gui.ss
View File

@ -9,9 +9,7 @@
(lib "sendurl.ss" "net") (lib "sendurl.ss" "net")
(lib "bitmap-label.ss" "mrlib") (lib "bitmap-label.ss" "mrlib")
"client.ss" "client.ss"
"info.ss" "info.ss")
;; Temporary hack for test suite in separate window:
(lib "extension.ss" "test-suite"))
(provide tool@) (provide tool@)
@ -633,13 +631,6 @@
(send defs read-from-file stream) (send defs read-from-file stream)
(read-editor-global-footer stream))) (read-editor-global-footer stream)))
(add-test-suite-extension
"Handin"
handin-icon
(lambda (parent editor)
(let ([content (editors->string (list editor))])
(new handin-frame% [parent parent] [content content]))))
(define tool@ (define tool@
(unit (unit
(import drscheme:tool^) (import drscheme:tool^)