zynk/irssi
2
0
Fork 0
mirror of https://github.com/irssi/irssi.git synced 2026-08-17 23:52:22 +02:00
Code Issues Projects Releases Packages Wiki Activity

Irssi 0.7.27 released.

Browse source 
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@130 dbcabf3a-b0e7-0310-adc4-f8d773084564
This commit is contained in:
Timo Sirainen 2000-02-25 17:03:17 +00:00 • committed by cras
commit f5fc624781
15 changed files with 135 additions and 29 deletions
Download patch file Download diff file Expand all files Collapse all files

19
examples/privmsg.pl Normal file
View file

@ -0,0 +1,19 @@
# listen PRIVMSGs - send a notice to yourself when your nick is meantioned
use Irssi;
sub event_privmsg {
my ($data, $server, $nick, $address) = @_;
my ($target, $text) = $data =~ /^(\S*)\s:(.*)/;
return if (!Irssi::is_channel($target));
%sinfo = %{$server->values()};
$mynick = $sinfo{'nick'};
return if ($text !~ /\b$mynick\b/);
$server->command("/notice $mynick In channel $target, $nick!$address said: $text");
}
Irssi::signal_add("event privmsg", "event_privmsg");