[Tkabber] small feature request

Glenn Jackman glennj at ncf.ca
Mon Dec 22 11:49:29 MSK 2003


Apologies for posting this here, as I don't speak russian and cannot use
the www.jabber.ru/bugzilla site.

I'd like to have the tkabber gui raise to the top when a new message
arrives.  This patch accomplishes that:


    $ diff iface.tcl.orig iface.tcl
    10a11,14
    > custom::defvar raise_client 1 \
    >     [::msgcat::mc "Raise client when new messages arrive."] \
    >     -group IFace -type boolean
    > 
    705c709
    <     global usetabbar raise_new_tab
    ---
    >     global usetabbar raise_new_tab raise_client
    733a738,740
    >         if {$raise_client} {
    >             raise [winfo toplevel .nb]
    >         } 
    896c903
    <     global focused
    ---
    >     global focused raise_client
    929a937,939
    >             if {$raise_client} {
    >                 raise [winfo toplevel .nb]
    >             }


    $ diff default.tcl.orig default.tcl
    42a43
    > set raise_client 1


-- 
Glenn Jackman
NCF Sysadmin
glennj at ncf.


More information about the Tkabber mailing list