Index: openacs-4/packages/xowiki-portlet/xowiki-portlet.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki-portlet/xowiki-portlet.info,v
diff -u -r1.6.2.4 -r1.6.2.5
--- openacs-4/packages/xowiki-portlet/xowiki-portlet.info	16 Sep 2021 08:27:07 -0000	1.6.2.4
+++ openacs-4/packages/xowiki-portlet/xowiki-portlet.info	8 Mar 2022 09:01:07 -0000	1.6.2.5
@@ -7,16 +7,17 @@
     <initial-install-p>f</initial-install-p>
     <singleton-p>t</singleton-p>
     
-    <version name="2.3" url="http://openacs.org/repository/download/apm/xowiki-portlet-2.3.apm">
+    <version name="2.4" url="http://openacs.org/repository/download/apm/xowiki-portlet-2.4.apm">
         <owner url="http://www.km.co.at">Michael Totschnig </owner>
 	<summary>Portlet for XoWiki</summary>
         <release-date>2021-09-15</release-date>
         <vendor url="http://wu.ac.at">WU Vienna</vendor>
         <license>BSD-Style</license>
         <maturity>1</maturity>
 
-        <provides url="xowiki-portlet" version="2.3"/>
+        <provides url="xowiki-portlet" version="2.4"/>
         <requires url="dotlrn" version="2.10.0"/>
+	<requires url="acs-tcl" version="5.10.1d11"/>        
         <requires url="new-portal" version="2.10.0"/>
         <requires url="xowiki" version="0.83"/>
 
Index: openacs-4/packages/xowiki-portlet/tcl/xowiki-admin-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki-portlet/tcl/xowiki-admin-portlet-procs.tcl,v
diff -u -r1.4.2.4 -r1.4.2.5
--- openacs-4/packages/xowiki-portlet/tcl/xowiki-admin-portlet-procs.tcl	8 Aug 2020 08:08:20 -0000	1.4.2.4
+++ openacs-4/packages/xowiki-portlet/tcl/xowiki-admin-portlet-procs.tcl	8 Mar 2022 09:01:07 -0000	1.4.2.5
@@ -81,36 +81,36 @@
     #
     # create the datasource
     #
-    set ds_id [::xo::db::sql::portal_datasource new -name $name \
+    set ds_id [::acs::dc call portal_datasource new -name $name \
                    -css_dir "" \
                    -description "Displays the admin interface for the xowiki data portlets"]
 
     # default configuration
 
-    ::xo::db::sql::portal_datasource set_def_param -datasource_id $ds_id \
+    ::acs::dc call portal_datasource set_def_param -datasource_id $ds_id \
         -config_required_p t -configured_p t \
         -key "shadeable_p" -value f
 
-    ::xo::db::sql::portal_datasource set_def_param -datasource_id $ds_id \
+    ::acs::dc call portal_datasource set_def_param -datasource_id $ds_id \
         -config_required_p t -configured_p t \
         -key "shaded_p" -value f
 
-    ::xo::db::sql::portal_datasource set_def_param -datasource_id $ds_id \
+    ::acs::dc call portal_datasource set_def_param -datasource_id $ds_id \
         -config_required_p t -configured_p t \
         -key "hideable_p" -value t
 
-    ::xo::db::sql::portal_datasource set_def_param -datasource_id $ds_id \
+    ::acs::dc call portal_datasource set_def_param -datasource_id $ds_id \
         -config_required_p t -configured_p t \
         -key "user_editable_p" -value f
 
-    ::xo::db::sql::portal_datasource set_def_param -datasource_id $ds_id \
+    ::acs::dc call portal_datasource set_def_param -datasource_id $ds_id \
         -config_required_p t -configured_p t \
         -key "link_hideable_p" -value t
 
     # xowiki-admin-specific procs
 
     # package_id must be configured
-    ::xo::db::sql::portal_datasource set_def_param -datasource_id $ds_id \
+    ::acs::dc call portal_datasource set_def_param -datasource_id $ds_id \
         -config_required_p t -configured_p f \
         -key "package_id" -value ""
 
@@ -119,7 +119,7 @@
     # service contract managemet
     #
     # create the implementation
-    ::xo::db::sql::acs_sc_impl new \
+    ::acs::dc call acs_sc_impl new \
         -impl_contract_name "portal_datasource" -impl_name $name \
         -impl_pretty_name "" -impl_owner_name $name
 
@@ -133,14 +133,14 @@
       Edit                  "xowiki_admin_portlet edit"
       RemoveSelfFromPage    "xowiki_admin_portlet remove_self_from_page"
     } {
-      ::xo::db::sql::acs_sc_impl_alias new \
+      ::acs::dc call acs_sc_impl_alias new \
           -impl_contract_name "portal_datasource" -impl_name $name  \
           -impl_operation_name $operation -impl_alias $call \
           -impl_pl "TCL"
     }
 
     # Add the binding
-    ::xo::db::sql::acs_sc_binding new \
+    ::acs::dc call acs_sc_binding new \
         -contract_name "portal_datasource" -impl_name $name
   }
   :log "--portlet end of [self proc]"
@@ -165,7 +165,7 @@
       #
       # drop the datasource
       #
-      ::xo::db::sql::portal_datasource delete -datasource_id $ds_id
+      ::acs::dc call portal_datasource delete -datasource_id $ds_id
       #
     } else {
       ns_log notice "No datasource id found for $name"
@@ -177,19 +177,19 @@
       GetMyName GetPrettyName Link AddSelfToPage
       Show Edit RemoveSelfFromPage
     } {
-      ::xo::db::sql::acs_sc_impl_alias delete \
+      ::acs::dc call acs_sc_impl_alias delete \
           -impl_contract_name "portal_datasource" -impl_name $name \
           -impl_operation_name $operation
     }
     #
     #  drop the binding
     #
-    ::xo::db::sql::acs_sc_binding delete \
+    ::acs::dc call acs_sc_binding delete \
         -contract_name "portal_datasource" -impl_name $name
     #
     #  drop the implementation
     #
-    ::xo::db::sql::acs_sc_impl delete \
+    ::acs::dc call acs_sc_impl delete \
         -impl_contract_name "portal_datasource" -impl_name $name
   }
   :log "--portlet end of [self proc]"
Index: openacs-4/packages/xowiki-portlet/tcl/xowiki-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki-portlet/tcl/xowiki-portlet-procs.tcl,v
diff -u -r1.3.6.3 -r1.3.6.4
--- openacs-4/packages/xowiki-portlet/tcl/xowiki-portlet-procs.tcl	12 Apr 2019 21:29:46 -0000	1.3.6.3
+++ openacs-4/packages/xowiki-portlet/tcl/xowiki-portlet-procs.tcl	8 Mar 2022 09:01:07 -0000	1.3.6.4
@@ -73,46 +73,46 @@
   # create the datasource
   #
   db_transaction {
-    set ds_id [::xo::db::sql::portal_datasource new -name $name \
+    set ds_id [::acs::dc call portal_datasource new -name $name \
                    -css_dir "" \
                    -description "Displays an xowiki page as a portlet"]
 
     # default configuration
-    ::xo::db::sql::portal_datasource set_def_param -datasource_id $ds_id \
+    ::acs::dc call portal_datasource set_def_param -datasource_id $ds_id \
         -config_required_p t -configured_p t \
         -key "shadeable_p" -value t
 
-    ::xo::db::sql::portal_datasource set_def_param -datasource_id $ds_id \
+    ::acs::dc call portal_datasource set_def_param -datasource_id $ds_id \
         -config_required_p t -configured_p t \
         -key "shaded_p" -value f
 
-    ::xo::db::sql::portal_datasource set_def_param -datasource_id $ds_id \
+    ::acs::dc call portal_datasource set_def_param -datasource_id $ds_id \
         -config_required_p t -configured_p t \
         -key "hideable_p" -value t
 
-    ::xo::db::sql::portal_datasource set_def_param -datasource_id $ds_id \
+    ::acs::dc call portal_datasource set_def_param -datasource_id $ds_id \
         -config_required_p t -configured_p t \
         -key "user_editable_p" -value f
 
-    ::xo::db::sql::portal_datasource set_def_param -datasource_id $ds_id \
+    ::acs::dc call portal_datasource set_def_param -datasource_id $ds_id \
         -config_required_p t -configured_p t \
         -key "link_hideable_p" -value t
 
     # xowiki-specific configuration
 
-    ::xo::db::sql::portal_datasource set_def_param -datasource_id $ds_id \
+    ::acs::dc call portal_datasource set_def_param -datasource_id $ds_id \
         -config_required_p t -configured_p f \
         -key "package_id" -value ""
 
-    ::xo::db::sql::portal_datasource set_def_param -datasource_id $ds_id \
+    ::acs::dc call portal_datasource set_def_param -datasource_id $ds_id \
         -config_required_p t -configured_p f \
         -key "page_name" -value ""
 
     #
     # service contract managemet
     #
     # create the implementation
-    ::xo::db::sql::acs_sc_impl new \
+    ::acs::dc call acs_sc_impl new \
         -impl_contract_name "portal_datasource" -impl_name $name \
         -impl_pretty_name "" -impl_owner_name $name
 
@@ -126,14 +126,14 @@
       Edit               "xowiki_portlet edit"
       RemoveSelfFromPage "xowiki_portlet remove_self_from_page"
     } {
-      ::xo::db::sql::acs_sc_impl_alias new \
+      ::acs::dc call acs_sc_impl_alias new \
           -impl_contract_name "portal_datasource" -impl_name $name  \
           -impl_operation_name $operation -impl_alias $call \
           -impl_pl "TCL"
     }
 
     # Add the binding
-    ::xo::db::sql::acs_sc_binding new \
+    ::acs::dc call acs_sc_binding new \
         -contract_name "portal_datasource" -impl_name $name
   }
   :log "--portlet end of [self proc]"
@@ -162,7 +162,7 @@
       #
       # drop the datasource
       #
-      ::xo::db::sql::portal_datasource delete -datasource_id $ds_id
+      ::acs::dc call portal_datasource delete -datasource_id $ds_id
       #
     } else {
       ns_log notice "No datasource id found for $name"
@@ -175,19 +175,19 @@
       GetMyName GetPrettyName Link AddSelfToPage
       Show Edit RemoveSelfFromPage
     } {
-      ::xo::db::sql::acs_sc_impl_alias delete \
+      ::acs::dc call acs_sc_impl_alias delete \
           -impl_contract_name "portal_datasource" -impl_name $name \
           -impl_operation_name $operation
     }
     #
     #  drop the binding
     #
-    ::xo::db::sql::acs_sc_binding delete \
+    ::acs::dc call acs_sc_binding delete \
         -contract_name "portal_datasource" -impl_name $name
     #
     #  drop the implementation
     #
-    ::xo::db::sql::acs_sc_impl delete \
+    ::acs::dc call acs_sc_impl delete \
         -impl_contract_name "portal_datasource" -impl_name $name
   }
   :log "--portlet end of [self proc]"