TABLE OF CONTENTS
::pwtk::engine_
SYNOPSIS
proc ::pwtk::engine_ {} {
PURPOSE
Parses $engine and sets the $runCmd variable.
SOURCE
uplevel 1 { switch -nocase -- $engine { pw - pw.x { set runCmd runPW } cp - cp.x { set runCmd runCP } default { ::pwtk::error "wrong engine \"$engine\", must be pw.x or cp.x" 1 } } } }