Differences From:

File tools/fossil_chat.tcl part of check-in [aeb2ac781d] - Fix the menu of fossil_chat.tcl for mac. by drh on 2007-09-24 22:23:32. [view]

To:

File tools/fossil_chat.tcl part of check-in [798a48ee46] - Merged mjanssen's timeline updates by jnc on 2007-09-24 23:58:55. [view]

@@ -220,12 +220,14 @@
     set time [clock format [clock seconds] -format {%H:%M} -gmt 1]
     set from [lindex $line 1]
     .msg.t insert end "\[$time $from\] " meta [lindex $line 2]\n norm
     .msg.t see end
+    set current_focus [focus]
     bell
     wm deiconify .
     update
     raise .
+    focus $current_focus
   } elseif {$cmd=="noop"} {
     # do nothing
   } elseif {$cmd=="meta"} {
     set now [clock seconds]