template::util::server_root (private, deprecated)

 template::util::server_root

Defined in packages/acs-templating/tcl/deprecated-procs.tcl

Deprecated. Invoking this procedure generates a warning.

uses ns_library to find the server root, may not always be accurate because it essentially asks for the Tcl library path and strips off the last /tcl directory.

See Also:

• use $::acs::rootdir instead

Testcases:

No testcase defined.

Source code:

ad_log_deprecated proc template::util::server_root

  set path_length [expr [llength [file split [ns_library private]]] - 1]
  set svr_root "/[join [lreplace [file split [ns_library private]] $path_length $path_length] / ]"
  return $svr_root

XQL Not present:

Generic, PostgreSQL, Oracle