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.56 -r1.57
--- openacs-4/packages/xowiki/tcl/includelet-procs.tcl 1 Oct 2008 13:48:54 -0000 1.56
+++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl 3 Oct 2008 12:06:14 -0000 1.57
@@ -2730,6 +2730,7 @@
{-voting_form_form ""}
{-voting_form_anon_instances "t"}
{-generate}
+ {-with_form_link true}
}}
}
@@ -2924,8 +2925,12 @@
set links [list]
set base [$package_id pretty_link [$form_item name]]
set label [$form_item name]
- append html [_ xowiki.entries_using_form [list form "$label"]]
+
+ if {$with_form_link} {
+ append html [_ xowiki.entries_using_form [list form "$label"]]
+ }
append html [t1 asHTML]
+
if {$csv} {
set csv_href "[::xo::cc url]?[::xo::cc actual_query]&includelet_key=[ns_urlencode $includelet_key]&generate=csv"
lappend links "csv"