TABLE OF CONTENTS
::pwtk::input::scriptClear
SYNOPSIS
proc ::pwtk::input::scriptClear {args} {
USAGE
:scriptClear name1 ?name2? ?...?
PURPOSE
Clear (unset) the content of the specified scripts.
ARGUMENTS
- args -- one or more script names
SOURCE
variable script foreach name $args { # clear the content of the script ::pwtk::ifexist script($name) { unset script($name) } } }