Index: openacs-4/packages/xowiki/tcl/includelet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/includelet-procs.tcl,v
diff -u -r1.239.2.81 -r1.239.2.82
--- openacs-4/packages/xowiki/tcl/includelet-procs.tcl	8 Jan 2022 15:57:48 -0000	1.239.2.81
+++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl	10 Jan 2022 14:41:37 -0000	1.239.2.82
@@ -4169,7 +4169,7 @@
         #
         ::xowiki::Package require $form_package_id
         set obj [form-menu-button-$button new -volatile -package_id $package_id \
-                     -base [::$package_id pretty_link -parent_id $parent_id $form] \
+                     -base [::$package_id pretty_link -parent_id $parent_id [$form name]] \
                      -form $form -parent_id $parent_id]
         if {[info exists return_url]} {$obj return_url $return_url}
         lappend button_objs $obj