Index: openacs-4/packages/acs-api-browser/tcl/test/acs-api-browser-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-api-browser/tcl/test/acs-api-browser-procs.tcl,v
diff -u -N -r1.4.2.36 -r1.4.2.37
--- openacs-4/packages/acs-api-browser/tcl/test/acs-api-browser-procs.tcl	26 Jun 2022 15:19:54 -0000	1.4.2.36
+++ openacs-4/packages/acs-api-browser/tcl/test/acs-api-browser-procs.tcl	24 Jul 2023 13:13:32 -0000	1.4.2.37
@@ -531,7 +531,7 @@
                     # apply the usual code-analysis on it. The "call"
                     # is never executed.
                     #
-                    set stub $::acs::rootdir/packages/$package_key/[file root $path]
+                    set stub $::acs::rootdir/packages/$package_key/[file rootname $path]
                     append _ $package_key/$path \n
                     set call [template::adp_init $type $stub]
                     incr processed