Questions about this topic? Sign up to ask in the talk tab.
Difference between revisions of "User:Mike/wikilink.pl"
From NetSec
GertieUbpgdd (Talk | contribs) |
AlizaLorenzo (Talk | contribs) |
||
| Line 1: | Line 1: | ||
| − | < | + | {{code|text=<syntaxhighlight lang="perl">use strict; |
use Irssi; | use Irssi; | ||
| Line 107: | Line 107: | ||
Irssi::command_bind('link', 'wikilink_self') | Irssi::command_bind('link', 'wikilink_self') | ||
| − | </ | + | </syntaxhighlight>}} |
Latest revision as of 05:19, 17 July 2012
|
<syntaxhighlight lang="perl">use strict; use Irssi; Irssi::signal_add 'message public', 'sig_message_public'; sub sig_message_public { my ($server, $msg, $nick, $nick_addr, $target, $host, $text) = @_;
my ($link, $linkname, $article, $artname);
unless ($target =~ m/(?:ed-logging)/i) { #dofuckall here
$article = $msg;
$artname = $msg;
if ($target =~ m/(?:bha-wiki
|
