Mercurial > pidgin
diff plugins/tcl/signal-test.tcl @ 10104:60db14d54914
[gaim-migrate @ 11131]
"This patch that makes received-im-msg and
received-chat-msg signals correspond with each other.
My motivation was to add flags to received-chat-msg,
but I also added conv to received-im-msg to make the
signals match each other."
-- Nathan Fredrickson (noif)
I also updated the receiving-im-msg and receiving-chat-msg signals to match.
Now I can finally reject patch 909745 with "this should be a plugin", which
I've wanted to be able to say for a while. Yay :)
committer: Tailor Script <tailor@pidgin.im>
author | Stu Tomlinson <stu@nosnilmot.com> |
---|---|
date | Sat, 16 Oct 2004 15:07:22 +0000 |
parents | 8f838ae3e710 |
children | 4d2d3104c92f |
line wrap: on
line diff
--- a/plugins/tcl/signal-test.tcl Sat Oct 16 01:05:40 2004 +0000 +++ b/plugins/tcl/signal-test.tcl Sat Oct 16 15:07:22 2004 +0000 @@ -46,22 +46,22 @@ gaim::debug -info "tcl signal" "quitting" } -gaim::signal connect [gaim::conversation handle] receiving-chat-msg { account who what id } { - gaim::debug -info "tcl signal" "receiving-chat-msg [gaim::account username $account] $id $who \"$what\"" +gaim::signal connect [gaim::conversation handle] receiving-chat-msg { account who what id flags } { + gaim::debug -info "tcl signal" "receiving-chat-msg [gaim::account username $account] $id $flags $who \"$what\"" return 0 } -gaim::signal connect [gaim::conversation handle] receiving-im-msg { account who what flags } { - gaim::debug -info "tcl signal" "receiving-im-msg [gaim::account username $account] $flags $who \"$what\"" +gaim::signal connect [gaim::conversation handle] receiving-im-msg { account who what id flags } { + gaim::debug -info "tcl signal" "receiving-im-msg [gaim::account username $account] $id $flags $who \"$what\"" return 0 } -gaim::signal connect [gaim::conversation handle] received-chat-msg { account who what id } { - gaim::debug -info "tcl signal" "received-chat-msg [gaim::account username $account] $id $who \"$what\"" +gaim::signal connect [gaim::conversation handle] received-chat-msg { account who what id flags } { + gaim::debug -info "tcl signal" "received-chat-msg [gaim::account username $account] $id $flags $who \"$what\"" } -gaim::signal connect [gaim::conversation handle] received-im-msg { account who what flags } { - gaim::debug -info "tcl signal" "received-im-msg [gaim::account username $account] $flags $who \"$what\"" +gaim::signal connect [gaim::conversation handle] received-im-msg { account who what id flags } { + gaim::debug -info "tcl signal" "received-im-msg [gaim::account username $account] $id $flags $who \"$what\"" } gaim::signal connect [gaim::conversation handle] sending-chat-msg { account what id } {