* Interpolate action properly in I want
authorDon Armstrong <don@donarmstrong.com>
Fri, 4 Jan 2008 00:33:31 +0000 (00:33 +0000)
committerDon Armstrong <don@donarmstrong.com>
Fri, 4 Jan 2008 00:33:31 +0000 (00:33 +0000)
.irssi/scripts/auto_bleh.pl

index 605cb68..e2abc92 100644 (file)
@@ -209,7 +209,8 @@ sub get_op {
 sub i_want {
      my $action = shift;
 
-     return "I've wanted to $action->{type} $action->{nick} off $action->{channel} on $action->{network} since $action->{inserted}";
+     return "I've wanted to ".join(',', keys %{$action->{type}||{'do something to'=>undef}}}).
+         " $action->{nick} off $action->{channel} on $action->{network} since $action->{inserted}";
 }
 
 sub take_action {