Changeset 928 for trunk

Timestamp:

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

Author:

toby

Message:

# on 2008/07/14 13:25:34, toby did:
change button labels to suit convention

File:

• trunk/expgui (modified) (6 diffs, 3 props)

trunk/expgui

@@ -775 +775 @@
     pack [button $win.but.1 -text Write -command "destroy $win"] -side left
     SetExportPhase [lindex $expmap(phaselist) 0] $win
-    pack [button $win.but.2 -text Quit \
+    pack [button $win.but.2 -text Cancel \
             -command "set expgui(export_phase) 0;destroy $win"] -side left
     pack [button $win.but.help -text Help -bg yellow \
@@ -2770 +2770 @@
     set expgui(temp) {}
     pack [frame $w.b -bg beige] -fill x -expand yes -side top
-    grid [button $w.b.2 -text Set -command "destroy $w"] -row 0 -column 1
-    grid [button $w.b.3 -text Quit \
+    grid [button $w.b.2 -text Continue -command "destroy $w"] -row 0 -column 1
+    grid [button $w.b.3 -text Cancel \
             -command "QuitEditBackground $w"] -row 0 -column 2
     grid [button $w.b.help -text Help -bg yellow \
@@ -2919 +2919 @@
 
     pack [frame $w.b -bg beige] -fill x -expand yes -side top
-    pack [button $w.b.2 -text Set -command "destroy $w"] -side left
-    pack [button $w.b.3 -text Quit -command "set expgui(temp) {}; destroy $w"] -side left
+    pack [button $w.b.2 -text Continue -command "destroy $w"] -side left
+    pack [button $w.b.3 -text Cancel -command "set expgui(temp) {}; destroy $w"] -side left
     pack [button $w.b.help -text Help -bg yellow \
             -command "MakeWWWHelp expgui3.html EditParm"] -side right
@@ -2998 +2998 @@
     }
     pack [frame $w.b -bg beige] -fill x -expand yes -side top
-    grid [button $w.b.2 -text Set \
+    grid [button $w.b.2 -text Continue \
             -command "SetEditProfile [list $entrylist] [list $phaselist] \
             [list $histlist] $w"] -row 0 -column 1
-    grid [button $w.b.3 -text Quit \
+    grid [button $w.b.3 -text Cancel \
             -command "QuitEditProfile $w [list $entrylist]"] -row 0 -column 2
     grid [button $w.b.help -text Help -bg yellow \
@@ -3111 +3111 @@
 
     pack [frame $w.b -bg beige] -fill x -expand yes -side top
-    grid [button $w.b.2 -text Set -command "AbsSaveEdit $w [list $histlist]"] \
+    grid [button $w.b.2 -text Continue -command "AbsSaveEdit $w [list $histlist]"] \
             -row 0 -column 1
-    grid [button $w.b.3 -text Quit \
+    grid [button $w.b.3 -text Cancel \
             -command "destroy $w"] -row 0 -column 2
     grid [button $w.b.help -text Help -bg yellow \
@@ -3593 +3593 @@
             ] -side top -expand yes -fill both
     pack [frame $w.b -bg beige] -fill x -expand yes -side top
-    grid [button $w.b.2 -text Set -command "set expgui(temp) 1; destroy $w"] -row 0 -column 1
-    grid [button $w.b.3 -text Quit \
+    grid [button $w.b.2 -text Continue -command "set expgui(temp) 1; destroy $w"] -row 0 -column 1
+    grid [button $w.b.3 -text Cancel \
             -command "set expgui(temp) 0; destroy $w"] -row 0 -column 2
 #    grid [button $w.b.help -text Help -bg yellow \