Index: openacs-4/packages/acs-tcl/tcl/test/http-client-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/Attic/http-client-procs.tcl,v
diff -u -N -r1.1.2.12 -r1.1.2.13
--- openacs-4/packages/acs-tcl/tcl/test/http-client-procs.tcl	11 Feb 2020 18:28:17 -0000	1.1.2.12
+++ openacs-4/packages/acs-tcl/tcl/test/http-client-procs.tcl	13 Jan 2021 11:00:18 -0000	1.1.2.13
@@ -29,9 +29,7 @@
         set response {{key1: "äöü", key2: "äüö", key3: "Ilić"}}
 
         set methods {POST GET}
-        set impls [expr {[string match http://* $url] ?
-                         [lindex [util::http::apis] 0] :
-                         [lindex [util::http::apis] 1]}]
+        set impls {curl native}
 
         aa_log "Will execute test on URL: '$url'"