remove `raco exe' plot test

collects/meta/props

@@ -1766,7 +1766,6 @@ path/s is either such a string or a list of them.
 "collects/tests/racket/embed-in-c.rktl" drdr:command-line (racket "-f" *)
 "collects/tests/racket/embed-me4.rktl" drdr:command-line #f
 "collects/tests/racket/embed-me5.rkt" drdr:command-line (gracket-text "-t" *)
-"collects/tests/racket/embed-me7.rkt" drdr:command-line (gracket-text "-t" *)
 "collects/tests/racket/embed-me9.rkt" drdr:command-line #f
 "collects/tests/racket/embed-planet-1/alt.rkt" drdr:command-line #f
 "collects/tests/racket/embed-planet-1/main.rkt" drdr:command-line #f

collects/tests/racket/embed-me7.rkt

@@ -1,15 +0,0 @@
-(module embed-me7 mzscheme
-  (require plot
-           mred
-           mzlib/class)
-  
-  (define img (plot (line (lambda (x) x))))
-
-  (define e (new text%))
-
-  (send e insert img)
-  
-  (with-output-to-file "stdout"
-    (lambda () 
-      (printf "plotted\n"))
-    'append))

collects/tests/racket/embed.rktl

@@ -377,23 +377,7 @@
              "--gui-exe"
              (path->string (mk-dest #t))
              (path->string (build-path (collection-path "tests" "racket") "embed-me5.rkt")))
-    (try-exe (mk-dest #t) "This is 5: #<class:button%>\n" #t))
+    (try-exe (mk-dest #t) "This is 5: #<class:button%>\n" #t)))
-
-  ;; Another GRacket-specific: try embedding plot, which has extra DLLs and font files:
-  (parameterize ([current-directory (find-system-path 'temp-dir)])
-    (define direct (build-path (find-system-path 'temp-dir) "direct.ps"))
-
-    (test #t
-          system* (build-path (find-console-bin-dir) "mred")
-          "-qu"
-          (path->string (build-path (collection-path "tests" "racket") "embed-me7.rkt"))
-          (path->string direct))
-
-    (system* mzc 
-             "--gui-exe"
-             (path->string (mk-dest #t))
-             (path->string (build-path (collection-path "tests" "racket") "embed-me7.rkt")))
-    (try-exe (mk-dest #t) "plotted\n" #t)))
 
 ;; Try including source that needs a reader extension