#!/bin/sh # \ exec itkwish -f "$0" ${1+"$@"} package require Iwidgets 3.0 # # Demo script for the Shell class # iwidgets::shell .sh -modality none -padx 20 -pady 20 -title Shell pack [label [.sh childsite].l -text SHELL] .sh center .sh activate