Index: openacs-4/packages/ezic-gateway/tcl/ezic-gateway-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ezic-gateway/tcl/ezic-gateway-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/ezic-gateway/tcl/ezic-gateway-procs.tcl	17 Apr 2018 14:47:02 -0000	1.5
+++ openacs-4/packages/ezic-gateway/tcl/ezic-gateway-procs.tcl	26 Nov 2024 09:23:38 -0000	1.6
@@ -91,7 +91,7 @@
 
     # Add the Referer to the headers passed on to EZIC
 
-    set header [ns_set new]
+    set header [ns_set create]
     ns_set put $header Referer $referer_url
 
     # Compile the URL for the GET communication with EZIC
@@ -297,7 +297,7 @@
 
     # Add the Referer to the headers passed on to EZIC.com
 
-    set header [ns_set new]
+    set header [ns_set create]
     ns_set put $header Referer $referer_url
 
     if {[string length $card_number] < 2} {
@@ -453,7 +453,7 @@
 
     # Add the Referer to the headers passed on to EZIC.com
 
-    set header [ns_set new]
+    set header [ns_set create]
     ns_set put $header Referer $referer_url
 
     if {[string length $card_number] < 2} {
@@ -632,7 +632,7 @@
 
     # Add the Referer to the headers passed on to EZIC gateway
 
-    set header [ns_set new]
+    set header [ns_set create]
     ns_set put $header Referer $referer_url
 
     if {[string length $card_number] < 2} {
@@ -791,7 +791,7 @@
 
     # Add the Referer to the headers passed on to EZIC gateway
 
-    set header [ns_set new]
+    set header [ns_set create]
     ns_set put $header Referer $referer_url
 
     # Compile the URL for the GET communication with EZIC gateway