# ezHelp
# $Header: /home/cvsroot/tcldb/wisql/Tlib/ezHelp,v 1.2 1997/05/28 03:12:55 de Exp $
proc ezHelp subject {
 
        global helpdir
 
        if {$subject == ""} {
                set subject "MissingHelp"
        }
 
        set helpfile $helpdir/$subject
        set title "WISQL Online Help"
 
        if [file isfile $helpfile] {
                set helptext [exec cat -s $helpfile]
        } else {
                set helptext "Sorry, there is no help on subject $subject\n(can't find file $helpdir/$subject)"
        }
 
#       mkAlert "$title" "\"$helptext\"" "Done" l {}
        mkEdit "$title" "$helptext" "Done" help {}
 
}

