Index: openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl,v
diff -u -N -r1.39 -r1.40
--- openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	27 Oct 2014 16:39:02 -0000	1.39
+++ openacs-4/packages/acs-automated-testing/tcl/aa-test-procs.tcl	27 Jun 2015 17:13:45 -0000	1.40
@@ -1103,10 +1103,11 @@
     }
 
     # TODO: Not working
-    set service(admin_login_url) "$service(url)register/?[export_vars { { email $service(adminemail) } { password $service(adminpassword) } }]"
-
+    set service(admin_login_url) [export_vars -base $service(url)register/ {
+	{ email $service(adminemail) }
+	{ password $service(adminpassword) }
+    }]
     set service(auto_test_url) "$service(url)test/admin"
-
     set service(rebuild_cmd) "sh [file join $service(script_path) recreate.sh]"
 }