Forum OpenACS Development: s5 meets XoWiki

About reusing www/admin pages. What I do is create an index.vuh file to redirect to the package I want to reuse the files from. This works just the same as a symlink would. In addition you can write code if not all the pages should be available or some other processing is needed.

Survey Library is a package that reuses most of the admin pages from survey-builder-ui (which in turn reuses the survey package data model, but provides a new UI)

http://cvs.openacs.org/cvs/openacs-4/packages/survey-library/www/index.vuh?rev=1.2&view=markup

#
#
# Serve up survey package pages under survey-library to add and edit items
#
# @author Dave Bauer (mailto:dave@thedesignexperience.org)
# @creation-date 2004-09-19
# @arch-tag: 35a5ad30-8b91-4a5b-b2a5-90257366bf4e
# @cvs-id $Id: index.vuh,v 1.2 2005/01/13 13:58:48 jeffd Exp $

set page [ad_conn path_info]
rp_internal_redirect /packages/survey-builder-ui/www/admin/${page}

It's also possible to restrict which pages can be redirected, just put a list of pages and check the URL against the list.

Error: GET http://192.168.6.35/s5/?
referred by "http://192.168.6.35/admin/site-map/";
during '::1500600 url'
::1500600 ::xotcl::Object->configure
::s5::Package ::xotcl::Class->create
invoked from within
"my create ::$package_id -url $url"
(procedure "require" line 8)
::s5::Package ::xo::PackageMgr->require
invoked from within
"my require -url $url $package_id"
(procedure "initialize" line 21)
::s5::Package ::xo::PackageMgr->initialize
invoked from within
"::s5::Package initialize -ad_doc {

This is the resolver for this package. It turns a request into
an object and executes the object with the comp..."
(file "/var/lib/aolserver/spb/packages/s5/www/index.vuh" line 2)
invoked from within
"source [ad_conn file]"
(procedure "rp_handle_tcl_request" line 3)
invoked from within
"$handler"
("uplevel" body line 2)
invoked from within
"uplevel $code"
invoked from within
"ad_try {
$handler
} ad_script_abort val {
# do nothing
}"
invoked from within
"rp_serve_concrete_file [ad_conn file]"
(procedure "rp_serve_abstract_file" line 60)
invoked from within
"rp_serve_abstract_file "$root/$path""
("uplevel" body line 2)
invoked from within
"uplevel $code"
invoked from within
"ad_try {
rp_serve_abstract_file "$root/$path"
set tcl_url2file([ad_conn url]) [ad_conn file]
set tcl_url2path_info..."

I'm using head version of Xowiki and XOTCL.

Note that there is no head version of XOTCL, but just a head-version of xotcl-core. XOTcl is a C-level Tcl extension, currently released in version 1.5.4.