util_get_current_url (public, deprecated)

 util_get_current_url

Defined in packages/acs-tcl/tcl/utilities-procs.tcl

Deprecated. Invoking this procedure generates a warning.

Returns a URL for re-issuing the current request, with query variables. If a form submission is present, that is converted into query vars as well. DEPRECATED: ad_return_url is a complete replacement for this API that also allows better control over the behavior.

Returns:

URL for the current page

Author:

Lars Pind <lars@pinds.com>

Created:

February 11, 2003

See Also:

• ad_return_url

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

Testcases:

No testcase defined.

Source code:

ad_log_deprecated proc util_get_current_url
    set url [ad_conn url]

    set query [ns_getform]
    if { $query ne "" } {
        append url ?[export_vars -entire_form]
    }

    return $url

XQL Not present:

PostgreSQL, Oracle

Generic XQL file:

packages/acs-tcl/tcl/utilities-procs.xql