schemeunit: fixed some properties and dangling requires

svn: r18252

collects/schemeunit/scribblings/file-test.scm

@@ -1,6 +1,6 @@
 #lang scheme/base
 
-(require schemeunit/test
+(require schemeunit
          "file.scm")
 
 (check-equal? (my-+ 1 1) 2)

collects/scribblings/guide/contracts-examples/1-test.ss

@@ -1,5 +1,5 @@
 #lang scheme
-(require schemeunit/test schemeunit/text-ui "1.ss" "1b.ss")
+(require schemeunit schemeunit/text-ui "1.ss" "1b.ss")
 
 (add (make-basic-customer 'mf "matthias" "brookstone"))
 (add (make-basic-customer 'rf "robby" "beverly hills park"))

collects/scribblings/guide/contracts-examples/2-test.ss

@@ -1,5 +1,5 @@
 #lang scheme
-(require schemeunit/test schemeunit/text-ui "2.ss")
+(require schemeunit schemeunit/text-ui "2.ss")
 
 (define s0 (initialize (flat-contract integer?) =))
 (define s2 (push (push s0 2) 1))

collects/scribblings/guide/contracts-examples/3-test.ss

@@ -1,5 +1,5 @@
 #lang scheme
-(require schemeunit/test schemeunit/text-ui "3.ss")
+(require schemeunit schemeunit/text-ui "3.ss")
 
 (define d0 (initialize (flat-contract integer?) =))
 (define d (put (put (put d0 'a 2) 'b 2) 'c 1))

collects/scribblings/guide/contracts-examples/5-test.ss

@@ -1,5 +1,5 @@
 #lang scheme
-(require schemeunit/test schemeunit/text-ui "5.ss")
+(require schemeunit schemeunit/text-ui "5.ss")
 
 (define s (put (put (initialize (flat-contract integer?) =) 2) 1))