# -*- tcl -*-
::xowf::Package initialize -ad_doc {

  This is the default resolver for the xowf package. In essence, it
  determines from the provided method "m" a web-callable method via
  the package specific "invoke" method, executes it and returns the
  result to the requestor.

  @author Gustaf Neumann (gustaf.neumann@wu-wien.ac.at)
  @creation-date July, 2006
  @cvs-id $Id: index.vuh,v 1.6.2.4 2021/07/29 12:36:56 gustafn Exp $

} -parameter {
  {-m:token view}
}
::$package_id log "--starting... [ns_conn url] [ns_conn query] (user_id [xo::cc user_id])" \
    "form vars = [ns_set array [ns_getform]]"    
#   "form vars = [ns_set keys [ns_getform] *_.*]"
#   "form vars = [ns_set array [ns_getform]]"
::$package_id reply_to_user [::$package_id invoke -method $m]
::$package_id log "--done... [ns_conn url]"

ad_script_abort

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