--- a/libpurple/plugins/tcl/signal-test.tcl Tue Jan 01 18:37:34 2013 -0500 +++ b/libpurple/plugins/tcl/signal-test.tcl Tue Jan 01 18:52:35 2013 -0500 @@ -108,7 +108,7 @@ purple::debug -info "tcl signal" "plugin-unload [list $args]" } -purple::signal connect [purple::savedstatuses handle] savedstatus-changed args { +purple::signal connect [purple::savedstatus handle] savedstatus-changed args { purple::debug -info "tcl signal" "savedstatus-changed [list $args]" purple::debug -info "tcl signal" "purple::savedstatus current = [purple::savedstatus current]" }