Changeset 1023 for branches

Timestamp:

Oct 12, 2010 3:43:36 PM (13 years ago)

Author:

chlake

Message:

minor modifications

File:

• branches/sandbox/disagledit.tcl (modified) (1 diff)

branches/sandbox/disagledit.tcl

@@ -107 +107 @@
                    -variable ::expgui(disaglSeparateBox)
        grid $dasave.option -row 0 -column 0
-       button $dasave.sexit -text "Save and run DISAGL" -command DA_Save
+       button $dasave.sexit -text "Save and run DISAGL" -command DA_Save -bg LightGreen
        grid $dasave.sexit -row 1 -column 0
      } else {
        wm title $dcb "Distance Search Parameters"
        grab release $dcb
-       button $dasave.sexit -text "Save and Exit" -command DA_Save
+       button $dasave.sexit -text "Save and Exit" -command DA_Save -bg LightGreen
        grid $dasave.sexit -row 0 -column 0
      }