summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authordakkar <dakkar@luxion>2008-08-06 11:32:21 +0000
committerdakkar <dakkar@luxion>2008-08-06 11:32:21 +0000
commit96fe2e3276b42b09d919123d4a71529d4b5a8726 (patch)
tree3e3506f12148689850734b83b1831d2467e2d70c
parentimport dello script per sincronizzare gli stati (diff)
downloadbroad_away-96fe2e3276b42b09d919123d4a71529d4b5a8726.tar.gz
broad_away-96fe2e3276b42b09d919123d4a71529d4b5a8726.tar.bz2
broad_away-96fe2e3276b42b09d919123d4a71529d4b5a8726.zip
avoid creating a new status if an existing one would do (including transients)
-rw-r--r--broad_away.pl5
1 files changed, 3 insertions, 2 deletions
diff --git a/broad_away.pl b/broad_away.pl
index 2fcf067..208f4c5 100644
--- a/broad_away.pl
+++ b/broad_away.pl
@@ -27,7 +27,8 @@ sub set_away {
$prev_status=$pidgin->PurpleSavedstatusGetCurrent()
unless defined $prev_status;
- my $status=$pidgin->PurpleSavedstatusFind($_[1][1]);
+ my $status= $pidgin->PurpleSavedstatusFind($_[1][1])
+ || $pidgin->PurpleSavedstatusFindTransientByTypeAndMessage(5,$_[1][1]);
if (!$status) {
$status=$pidgin->PurpleSavedstatusNew(undef,5); # away
$pidgin->PurpleSavedstatusSetMessage($status,$_[1][1]);
@@ -52,7 +53,7 @@ sub set_back {
return Xchat::EAT_NONE;
}
-Xchat::register('broad away','0.1','broadcast the away status onto Pidgin');
+Xchat::register('broad away','0.2','broadcast the away status onto Pidgin');
Xchat::hook_command('away',\&set_away);
Xchat::hook_command('back',\&set_back);