Index: openacs-4/packages/xowiki/tcl/xowiki-callback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-callback-procs.tcl,v
diff -u -r1.71 -r1.72
--- openacs-4/packages/xowiki/tcl/xowiki-callback-procs.tcl	2 Apr 2013 10:43:17 -0000	1.71
+++ openacs-4/packages/xowiki/tcl/xowiki-callback-procs.tcl	11 Apr 2013 12:56:24 -0000	1.72
@@ -39,7 +39,9 @@
     set root_folder_id [::xo::db::CrClass lookup -name "xowiki: $package_id" -parent_id -100]
     if {$root_folder_id ne "0"} {
       # we deal with a correctly installed package
-      if {[db_0or1row is_transformed_folder "select 1 from cr_folders where folder_id = $root_folder_id"]} {
+      if {[::xo::db_0or1row is_transformed_folder {
+	select 1 from cr_folders where folder_id = :root_folder_id}
+	  ]} {
 	::xo::db::sql::content_folder delete -folder_id $root_folder_id -cascade_p 1
       } else {
 	::xo::db::sql::content_item delete -item_id $root_folder_id