From 96fe2e3276b42b09d919123d4a71529d4b5a8726 Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@luxion>
Date: Wed, 6 Aug 2008 11:32:21 +0000
Subject: avoid creating a new status if an existing one would do (including
 transients)

---
 broad_away.pl | 5 +++--
 1 file 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);
-- 
cgit v1.2.3