TABLE OF CONTENTS

::pwtk::outdir_create

SYNOPSIS

proc ::pwtk::outdir_create {} {

PURPOSE

Create the outdir directory if it does not exist.

NOTES

This proc is typically used only by the PWTK internally.

RETURN VALUE

The name of the created "outdir".

SOURCE

    set outdir [outdir_query]

    if { ! [file isdirectory $outdir] && $outdir != "" } {
        if { [catch {file mkdir $outdir}] } {
            ::pwtk::error "cannot create \"outdir\" directory: $outdir"
        }
    } 
    return $outdir
}