@@ -525,11 +525,12 @@
 	 (local-megatest  (let* ((lm  (car (argv)))
 				 (dir (pathname-directory lm))
 				 (exe (pathname-strip-directory lm)))
 			    (conc (if dir (conc dir "/") "")
 				  (case (string->symbol exe)
-				    ((dboard) "megatest")
+				    ((dboard)    "megatest")
+				    ((mtest)     "megatest")
 				    ((dashboard) "megatest")
 				    (else exe)))))
 	 (test-sig   (conc test-name ":" (item-list->path itemdat))) ;; test-path is the full path including the item-path
 	 (work-area  #f)
 	 (toptest-work-area #f) ;; for iterated tests the top test contains data relevant for all