#! /usr/local/bin/iwish -f
set system(verbose) 0
source /usr/local/lib/theObjects/modules.tcl
wm geometry . +5+5
wm withdraw .
load(toolkit)
set file [lindex $argv 0]
if { $file == {} } {
  set file temp
}
tkwait window [Helpedit new $file]
. Dismiss
