TABLE OF CONTENTS

::pwtk::input::load_state

SYNOPSIS

proc ::pwtk::input::load_state {peekData} {

PURPOSE

Load the input data state & state that was saved by ::pwtk::input::peek.

ARGUMENT

SOURCE

    foreach {arr arrData} $peekData {
        upvar #0 $arr arrVar
        if { [info exists arrVar] } { 
            unset arrVar 
        }
        if { $arrData != "" } { 
            array set arrVar $arrData
        }
    }
}