TABLE OF CONTENTS

::pwtk::import

SYNOPSIS

proc ::pwtk::import {scriptFile} {

PURPOSE

Import the specified pwtk-script file. This is like the Tcl source command, but handels correctly the sourcing from various directories.

ARGUMENTS

SOURCE

    set here [pwd]
    set dir  [file dirname $scriptFile]
    set file [file tail $scriptFile]
    cd $dir
    uplevel "source $file"
    cd $here
}