doc_find_template (public, deprecated)

 doc_find_template filename

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

Deprecated. Invoking this procedure generates a warning.

Finds a master.adp file which can be used as a master template, looking in the directory containing $filename and working our way down the directory tree.

Parameters:

filename (required)

Testcases:

No testcase defined.

Source code:

ad_log_deprecated proc doc_find_template
    set path_root $::acs::rootdir

    set start [clock clicks -milliseconds]

    set dir [ad_file dirname $filename]
    while { [string length $dir] > 1 && [string first $path_root $dir] == 0 } {
        # Only look in directories under the path root.
        if { [file isfile "$dir/master.adp"] } {
            return "$dir/master.adp"
        }
        set dir [ad_file dirname $dir]
    }

    if { [file exists "$path_root/templates/master.adp"] } {
        return "$path_root/templates/master.adp"
    }

    # Uhoh. Nada!
    return ""

XQL Not present:

PostgreSQL, Oracle

Generic XQL file:

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