Index: openacs-4/packages/acs-tcl/tcl/test/http-client-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/http-client-procs.tcl,v
diff -u -r1.1.2.27 -r1.1.2.28
--- openacs-4/packages/acs-tcl/tcl/test/http-client-procs.tcl	20 Aug 2024 08:14:40 -0000	1.1.2.27
+++ openacs-4/packages/acs-tcl/tcl/test/http-client-procs.tcl	27 Aug 2024 09:52:22 -0000	1.1.2.28
@@ -60,7 +60,7 @@
                         set F_json [ad_opentmpfile tmpfile_app_json]
                         if {$impl eq "curl"} {
                             aa_log "... running [::util::which curl] $url -k -o -"
-                            puts $F_json [exec -ignorestderr [::util::which curl] $url -k -o -]
+                            puts $F_json [exec -ignorestderr [::util::which curl] $url -s -k -o -]
                         } else {
                             ns_http run -method GET -spoolsize 0 -outputchan $F_json $url
                         }
@@ -110,7 +110,7 @@
                         set F_iso8859_2 [ad_opentmpfile tmpfile_iso8859_2]
 
                         if {$impl eq "curl"} {
-                            puts $F_iso8859_2 [exec -ignorestderr [::util::which curl] $url -k -o -]
+                            puts $F_iso8859_2 [exec -ignorestderr [::util::which curl] $url -s -k -o -]
                         } else {
                             ns_http run -method GET -spoolsize 0 -outputchan $F_iso8859_2 $url
                         }