q_username: remove, no longer needed with modern Irssi

diff --git a/_data/scripts.yaml b/_data/scripts.yaml
index 8ffb1445728decd5deffe8c858e2feb8b62714b6..154b465676aac827f8a4dbefe24477687fbc85e6 100644 (file)
--- a/_data/scripts.yaml
+++ b/_data/scripts.yaml
@@ -3041,15 +3041,6 @@
   name: procmaillog
   url: ''
   version: '2.02'
--
-  authors: "Teemu 'jamov' Koskinen"
-  contact: teemu.koskinen@mbnet.fi
-  description: 'Prints the Q username in right format'
-  filename: q_username.pl
-  license: 'Public Domain'
-  modified: '2008-05-17 17:39:11'
-  name: q_username
-  version: '0.1'
 -
   authors: 'Doug Freed'
   contact: dwfreed!#irssi@freenode

diff --git a/scripts/q_username.pl b/scripts/q_username.pl
deleted file mode 100644 (file)
index 6652ddf..0000000
--- a/scripts/q_username.pl
+++ /dev/null
@@ -1,26 +0,0 @@
-# Prints the Q username in right format
-
-use strict;
-use Irssi;
-use vars qw($VERSION %IRSSI);
-$VERSION = "0.1";
-%IRSSI = (
-    authors=> "Teemu \'jamov\' Koskinen",
-    contact=> "teemu.koskinen\@mbnet.fi",
-    name=> "q_username",
-    description=> "Prints the Q username in right format",
-    license=> "Public Domain",
-);
-
-Irssi::theme_register([whois_auth => ' authnick : $1']);
-
-sub event_whois_auth {
-       my ($server, $data) = @_;
-       my ($num, $nick, $auth_nick) = split(/ +/, $_[1], 3);
-        $auth_nick =~ s/\:is authed as //;
-
-       $server->printformat($nick, MSGLEVEL_CRAP, 'whois_auth', $nick, $auth_nick);
-       Irssi::signal_stop();
-}
-
-Irssi::signal_add('event 330', 'event_whois_auth');