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 -N -r1.239.2.27 -r1.239.2.28
--- openacs-4/packages/xowiki/tcl/includelet-procs.tcl	3 Nov 2019 15:11:38 -0000	1.239.2.27
+++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl	3 Nov 2019 15:25:37 -0000	1.239.2.28
@@ -4650,11 +4650,16 @@
     }
 
     set links [list]
-    set base [$form_item pretty_link]
-    set label [$form_item name]
 
     if {$with_form_link} {
-      append html [_ xowiki.entries_using_form [list form "<a href='[ns_quotehtml $base]'>[ns_quotehtml $label]</a>"]]
+      set form_links ""
+      foreach form_item_id $form_item_ids {
+        set base [::$form_item pretty_link]
+        set label [::$form_item name]
+        lappend form_links "<a href='[ns_quotehtml $base]'>[ns_quotehtml $label]</a>"
+      }
+      
+      append html [_ xowiki.entries_using_form [list form [join $form_links ", "]]]
     }
     append html [t1 asHTML]