Index: openacs-4/packages/acs-tcl/tcl/test/doc-check-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/test/doc-check-procs.tcl,v
diff -u -N -r1.15 -r1.16
--- openacs-4/packages/acs-tcl/tcl/test/doc-check-procs.tcl	25 Jul 2018 14:53:39 -0000	1.15
+++ openacs-4/packages/acs-tcl/tcl/test/doc-check-procs.tcl	25 Jul 2018 16:47:34 -0000	1.16
@@ -178,10 +178,22 @@
         if {[dict exists $proc_doc param]} {
             incr count
             set params [dict get $proc_doc param]
+            #
+            # Build the real parameters list
+            #
             set real_params [list \
                 {*}[dict get $proc_doc switches] \
                 {*}[dict get $proc_doc positionals]]
             #
+            # Check if the last parameter is 'args', as it is not included into
+            # 'switches' or 'positionals', and add it to the real parameter list
+            #
+            if {[dict exists $proc_doc arg_list]
+                && [lindex [dict get $proc_doc arg_list] end] eq "args"
+            } {
+                lappend real_params args
+            }
+            #
             # Check if the @param exists in the list of parameters
             #
             foreach param_doc $params {