Index: openacs-4/packages/xowf/tcl/iprange-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/Attic/iprange-procs.tcl,v
diff -u -N -r1.1.2.2 -r1.1.2.3
--- openacs-4/packages/xowf/tcl/iprange-procs.tcl	12 Sep 2022 13:45:42 -0000	1.1.2.2
+++ openacs-4/packages/xowf/tcl/iprange-procs.tcl	12 Sep 2022 13:47:09 -0000	1.1.2.3
@@ -11,6 +11,10 @@
 }
 
 namespace eval ::xowf {
+  #
+  # Class representing a range of IPs to be used to enforce access
+  # control.
+  #
   nx::Class create IpRange {
     :property {allowed ""}
     :property {disallowed ""}