etp::get_name (public)

 etp::get_name

Defined in packages/edit-this-page/tcl/etp-procs.tcl

Author:

Luke Pond

Created:

2001-06-10 Returns the canonical page name for the current request.

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

    set url_stub [ad_conn url]
    if { [string index $url_stub end] eq "/" } {
    set name index
    } else {
    set name [file rootname [file tail $url_stub]]
    }
    return $name

Generic XQL file:

packages/edit-this-page/tcl/etp-procs.xql

PostgreSQL XQL file:

packages/edit-this-page/tcl/etp-procs-postgresql.xql

Oracle XQL file:

packages/edit-this-page/tcl/etp-procs-oracle.xql