version 1.2, 2000/02/02 19:14:10
|
version 1.3, 2000/02/22 18:10:27
|
Line 60 proc createControlWindow {} {
|
Line 60 proc createControlWindow {} {
|
{ specifyClass "Select the capa.config in the class directory" \ |
{ specifyClass "Select the capa.config in the class directory" \ |
"CAPA configuration" "capa.config" runCapaTools } |
"CAPA configuration" "capa.config" runCapaTools } |
$action add command -label "Send Class Email" -command \ |
$action add command -label "Send Class Email" -command \ |
{ specifyClass "Select the capa.config in the class directory" \ |
{ specifyClass "Select the capa.config in the class directory" \ |
"CAPA configuration" "capa.config" runGroupEmail } |
"CAPA configuration" "capa.config" runGroupEmail } |
$action add command -label "Randomize Seating File" \ |
$action add command -label "Randomize Seating File" \ |
-command { RSstart [incr gUniqueNumber] } |
-command { RSstart [incr gUniqueNumber] } |
|
|