# -*- tcl -*-
::xowf::Package initialize 
set l [expr {[lsearch -exact [ns_conn urlv] admin] + 1 }]
set path [join [lrange [ns_conn urlv] $l end] /]
rp_internal_redirect /packages/xowiki/www/admin/$path

# Local variables:
#    mode: tcl
#    tcl-indent-level: 4
#    indent-tabs-mode: nil
# End: