Index: openacs-4/packages/xotcl-core/xotcl-core.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/xotcl-core.info,v
diff -u -r1.106.2.13 -r1.106.2.14
--- openacs-4/packages/xotcl-core/xotcl-core.info 20 Feb 2020 10:15:21 -0000 1.106.2.13
+++ openacs-4/packages/xotcl-core/xotcl-core.info 21 Feb 2020 13:28:48 -0000 1.106.2.14
@@ -10,23 +10,23 @@
t
xotcl
-
- Gustaf Neumann
- XOTcl library functionality (e.g. thread handling, online documentation, Generic Form and List Classes)
- 2017-08-06
- WU Vienna
- <pre>
+
+ Gustaf Neumann
+ XOTcl library functionality (e.g. thread handling, online documentation, Generic Form and List Classes)
+ 2017-08-06
+ WU Vienna
+ <pre>
This component contains some core functionality for OpenACS
applications using XOTcl. It includes
XOTcl thread handling for OpenACS (supporting persistent and
volatile threads) and a definitions for
-documenting XOTcl object, classes and methods
+documenting XOTcl object, classes and methods
integrated with the API-browser of OpenACS. Documented
procs and instproc an be created using the methods ad_proc
-and ad_instproc. This component provides as
+and ad_instproc. This component provides as
well an XOTcl Object and Class browser, as well as
means to control the recreation of objects and classes
-when components are reloaded.
+when components are reloaded.
Features:
- oo-abstraction with caching (acs-objects and cr-items/revisions)
- single and multi instantiations (turn all tuples into objects)
@@ -40,28 +40,28 @@
- support for XOTcl and NX
</pre>
- BSD-Style
- 2
+ BSD-Style
+ 2
-
+
-
+
-
-
-
-
-
-
+
+
+
+
-
-
-
+
+
+
Index: openacs-4/packages/xotcl-core/tcl/06-package-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/06-package-procs.tcl,v
diff -u -r1.41.2.15 -r1.41.2.16
--- openacs-4/packages/xotcl-core/tcl/06-package-procs.tcl 20 Feb 2020 11:01:45 -0000 1.41.2.15
+++ openacs-4/packages/xotcl-core/tcl/06-package-procs.tcl 21 Feb 2020 13:28:48 -0000 1.41.2.16
@@ -126,6 +126,7 @@
$page set_content [string trim [$page text] " \n"]
$page initialize_loaded_object
+ xo::Package require $package_id
set p [::$package_id get_page_from_name -name $fullName -parent_id $parent_id]
#:log "--get_page_from_name --> '$p'"
if {$p eq ""} {
@@ -227,7 +228,7 @@
PackageMgr instproc require_site_wide_pages {
{-refetch:boolean false}
- {-pages}
+ {-pages ""}
} {
#
# If no pages are provided, take the default of the definition of