Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v
diff -u -r1.542.2.73 -r1.542.2.74
--- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 9 Apr 2020 21:50:54 -0000 1.542.2.73
+++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 3 May 2020 17:52:03 -0000 1.542.2.74
@@ -2844,8 +2844,8 @@
if {![info exists ::xowiki_page_item_id_rendered]} {
return ""
}
- #:log "--OMIT and not $field in ([join $::xowiki_page_item_id_rendered ,])"
- return "and not $field in ([join $::xowiki_page_item_id_rendered ,])"
+ #:log "--OMIT and not $field in ([ns_dbquotelist $::xowiki_page_item_id_rendered])"
+ return "and not $field in ([ns_dbquotelist $::xowiki_page_item_id_rendered])"
}
Page instproc htmlFooter {{-content ""}} {
@@ -4348,7 +4348,7 @@
} elseif {[llength $from_package_ids] == 1} {
set package_clause "and package_id = :from_package_ids"
} else {
- set package_clause "and package_id in ([join $from_package_ids ,])"
+ set package_clause "and package_id in ([ns_dbquotelist $from_package_ids])"
}
if {$parent_id eq "*"} {
@@ -4378,7 +4378,7 @@
set sql [::xo::dc select \
-vars [join $sql_atts ", "] \
-from xowiki_form_instance_item_view \
- -where " page_template in ([join $base_item_ids ,]) \
+ -where " page_template in ([ns_dbquotelist $base_item_ids]) \
$publish_status_clause $filter_clause $package_clause $parent_clause \
$extra_where_clause" \
-orderby $orderby \
Index: openacs-4/packages/xowf/xowf.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/xowf.info,v
diff -u -r1.12.2.14 -r1.12.2.15
--- openacs-4/packages/xowf/xowf.info 22 Apr 2020 19:56:26 -0000 1.12.2.14
+++ openacs-4/packages/xowf/xowf.info 3 May 2020 17:58:30 -0000 1.12.2.15
@@ -10,16 +10,17 @@
t
xowf
-
+
Gustaf Neumann
XoWiki Content Flow - an XoWiki based workflow system implementing state-based behavior of wiki pages and forms
2017-08-06
WU Vienna
2
-
+
+
Index: openacs-4/packages/xowf/tcl/atjob-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/atjob-procs.tcl,v
diff -u -r1.8.2.4 -r1.8.2.5
--- openacs-4/packages/xowf/tcl/atjob-procs.tcl 9 Sep 2019 17:05:09 -0000 1.8.2.4
+++ openacs-4/packages/xowf/tcl/atjob-procs.tcl 3 May 2020 17:58:30 -0000 1.8.2.5
@@ -89,7 +89,7 @@
set sql "select package_id, item_id, name, parent_id, publish_status, creation_user,
revision_id, page_template, instance_attributes
from xowiki_form_instance_item_view
- where item_id in ([join $item_ids ,])"
+ where item_id in ([ns_dbquotelist $item_ids])"
set items [::xowiki::FormPage instantiate_objects \
-object_class ::xowiki::FormPage \
Index: openacs-4/packages/tsearch2-driver/tsearch2-driver.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/tsearch2-driver/tsearch2-driver.info,v
diff -u -r1.19.2.1 -r1.19.2.2
--- openacs-4/packages/tsearch2-driver/tsearch2-driver.info 2 Jan 2020 13:00:35 -0000 1.19.2.1
+++ openacs-4/packages/tsearch2-driver/tsearch2-driver.info 3 May 2020 18:00:42 -0000 1.19.2.2
@@ -9,15 +9,16 @@
f
t
-
+
Dave Bauer
Full text search support for Search via Tsearch2.
2017-08-06
Provides an implementation for the search packages service contract for searching on PostgreSQL.
3
-
+
+
Index: openacs-4/packages/tsearch2-driver/tcl/tsearch2-driver-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/tsearch2-driver/tcl/tsearch2-driver-procs.tcl,v
diff -u -r1.41.2.3 -r1.41.2.4
--- openacs-4/packages/tsearch2-driver/tcl/tsearch2-driver-procs.tcl 4 Feb 2020 08:52:53 -0000 1.41.2.3
+++ openacs-4/packages/tsearch2-driver/tcl/tsearch2-driver-procs.tcl 3 May 2020 18:00:42 -0000 1.41.2.4
@@ -181,7 +181,7 @@
}
if {$ids ne ""} {
set need_acs_objects 1
- lappend where_clauses "o.package_id in ([join $ids ,])"
+ lappend where_clauses "o.package_id in ([ns_dbquotelist $ids])"
}
if {$need_acs_objects} {
lappend from_clauses "txt" "acs_objects o"