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