Changeset 929

Timestamp:

Dec 4, 2009 5:14:29 PM (14 years ago)

Author:

toby

Message:

# on 2008/07/14 13:26:22, toby did:
change some button labels to be more conventional

File:

• trunk/gsascmds.tcl (modified) (5 diffs, 3 props)

trunk/gsascmds.tcl

@@ -487 +487 @@
     pack [button $w.b.2 -text Continue -command "destroy $w"] -side left
     if $quit {
-        pack [button $w.b.3 -text Quit \
+        pack [button $w.b.3 -text Cancel \
                 -command "set expgui(temp) {}; destroy $w"] -side left
     }
@@ -700 +700 @@
     pack [frame $w.c -bg beige] -side top -expand yes -fill both
     pack [frame $w.d -bg beige] -side top -expand yes -fill both
-    pack [button $w.d.2 -text Set  \
+    pack [button $w.d.2 -text Continue  \
               -command "SaveChangeProfileType $w.c [list $histlist] [list $phaselist]; destroy $w"\
             ] -side left
-    pack [button $w.d.3 -text Quit \
+    pack [button $w.d.3 -text Cancel \
             -command "destroy $w"] -side left
     pack [button $w.d.help -text Help -bg yellow \
@@ -1260 +1260 @@
     pack [button $frm.2.help -text Help -bg yellow \
             -command "MakeWWWHelp expgui.html DeleteHistoryRecords"] -side top
-    pack [button $frm.2.4 -text Quit \
+    pack [button $frm.2.4 -text Cancel \
             -command {destroy .history}] -side bottom
     pack [button $frm.2.3 -text OK \
@@ -1633 +1633 @@
     pack [button $frmC.help -text Help -bg yellow \
             -command "MakeWWWHelp expgui.html ConvertWin"] -side top
-    pack [button $frmC.q -text Quit -command "destroy $frm"] -side bottom
+    pack [button $frmC.q -text Cancel -command "destroy $frm"] -side bottom
     pack [button $frmC.b -text Convert -command "ValidWinCnv $frm"] \
             -side bottom
@@ -1937 +1937 @@
         $frmC.b config -text Save
     }
-    pack [button $frmC.q -text Quit \
+    pack [button $frmC.q -text Cancel \
             -command "set expgui(FileMenuEXPNAM) {}; destroy $frm"] -side bottom
     bind $frm <Return> "$frmC.b invoke"