Index: openacs-4/packages/xowf/tcl/iprange-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/iprange-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/xowf/tcl/iprange-procs.tcl	3 Sep 2024 15:37:54 -0000	1.2
+++ openacs-4/packages/xowf/tcl/iprange-procs.tcl	26 Nov 2024 09:13:08 -0000	1.3
@@ -22,7 +22,7 @@
     :property {title ""}
 
     :method match {spec ip} {
-      if {[string first / $spec] > -1 && [ns_subnetmatch $spec $ip]} {
+      if {[string first / $spec] > -1 && [ns_ip match $spec $ip]} {
         return 1
       } elseif {[string first * $spec] > -1 && [string match $spec $ip]} {
         return 1