Index: megatest.scm
==================================================================
--- megatest.scm
+++ megatest.scm
@@ -766,11 +766,17 @@
      	  (exit 1))))
      
      ;; immediately set MT_TARGET if -reqtarg or -target are available
      ;;
      (let ((targ (or (args:get-arg "-reqtarg")(args:get-arg "-target"))))
-       (if targ (set-environment-variable! "MT_TARGET" targ)))
+       (if targ 
+        (begin
+          (set-environment-variable! "MT_TARGET" targ)
+          (mytarget targ)
+        )
+        )
+       )
      
      ;; The watchdog is to keep an eye on things like db sync etc.
      ;;
 ;; (init-watchdog)