Minor fix for the flat menu bar.

Updated the contributors list.

diff --git a/about.tcl b/about.tcl
index cda4e4cc6e44edc1d6ba2cb494f62ade6f45aa81..b137404b5a466d84b628dd7d2f08fc41f5c030d6 100644 (file)
--- a/about.tcl
+++ b/about.tcl
@@ -23,7 +23,8 @@ dialog about {
        frame $self.mug -bd 4
        label $self.mug.l -justify left \
             -text "Originally by Sam Shen\n\Contributions\
-            from:\nPaul Healy\nJohn LoVerso\n\T. Schotanus\nPat Thoyts\n"
+            from:\nPaul Healy\nJohn LoVerso\n\T. Schotanus\
+            \nPat Thoyts\nAlexander Caldwell\n"
 
        global about_priv
        if ![info exists about_priv(mug_image)] {

diff --git a/tkinspect.tcl b/tkinspect.tcl
index 51ebb2373298ec1722922d5366eee6b4e98f9ca8..73f97054ef83d859ff37f87ec4a2d3dc5724d2a9 100644 (file)
--- a/tkinspect.tcl
+++ b/tkinspect.tcl
@@ -405,7 +405,7 @@ dialog tkinspect_main {
        set w $self.menu.[string tolower $name]
        menubutton $w -menu $w.m -text $name -underline 0 -bd 1 -relief flat
         bind $w <Enter> {%W configure -relief raised -bd 1}
-        bind $w <Leave> {%W configure -relief flat -bd 0}
+        bind $w <Leave> {%W configure -relief flat -bd 1}
        pack $w -side left
        menu $w.m
        return $w.m