.

original commit: 96880c44ab9cd1127fbf013dd1f863ff5e049369
2002-02-03 02:16:19 +00:00 · 2002-02-03 02:16:19 +00:00 · c2ece52b17
commit c2ece52b17
parent 11858440c6
1 changed files with 1 additions and 2 deletions
--- a/collects/tests/framework/main.ss
+++ b/collects/tests/framework/main.ss
@ -5,8 +5,7 @@
 	   "debug.ss"
 	   "test-suite-utils.ss")

-  ;; must be run in the right context...
-  (define argv (namespace-variable-binding 'argv))
+  (define argv (current-command-line-arguments))

  (define preferences-file (build-path (find-system-path 'pref-dir)
 				       (case (system-type)