Flummi/pokerschmoker
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

„pokerschmoker.pl“ hinzufügen

Browse Source
This commit is contained in:
Flummi 2023-07-08 21:23:18 +00:00
parent 312e836b22
commit bcdd5687de
1 changed files with 25 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
pokerschmoker.pl Normal file
View File

@ -0,0 +1,25 @@
#!/usr/bin/env perl -w
use strict;
use utf8;
sub pokerschmoker_cb {
my($data, $mod, $mod_data, $msg) = @_;
if($msg =~ /^pj/) {
$msg = "poker join";
}
elsif($msg =~ /^pl/) {
$msg = "poker leave";
}
elsif($msg =~ /^ca$/) {
$msg = "call";
}
elsif($msg =~ /^c$/) {
$msg = "check";
}
return $msg;
}
weechat::register("pokerschmoker.pl", "flummi", "1.0", "MIT", "pokerschmoker", "", "");
weechat::hook_modifier("input_text_for_buffer", "pokerschmoker_cb", "");