pa_make_file_name (public)

 pa_make_file_name [ -ext ext ] id

Defined in packages/photo-album/tcl/photo-album-procs.tcl

constructs a filename for an image based on id and extension.

Switches:

-ext

(optional)

Parameters:

id

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

Testcases:

No testcase defined.

Source code:

    if {$ext ne "" && ![regexp {^\.} $ext foo]} {
    #add back the dot
    set ext ".${ext}"
    }
    set total_file_name "${id}${ext}"

    return $total_file_name

Generic XQL file:

packages/photo-album/tcl/photo-album-procs.xql

PostgreSQL XQL file:

packages/photo-album/tcl/photo-album-procs-postgresql.xql

Oracle XQL file:

packages/photo-album/tcl/photo-album-procs-oracle.xql