summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAvatar Anders Ossowicki <arkanoid@exherbo.org> 2009-11-17 12:09:48 +0100
committerAvatar Anders Ossowicki <arkanoid@exherbo.org> 2009-11-17 12:09:48 +0100
commit16a747ccea22b695cf707e360a90392a664197cc (patch)
treea62c942ca6d78187b6b40b95736e02363052ccca
parent1a60d887d540efe39e3112397c9056985502011b (diff)
downloadhacchi-restart.tar.gz
hacchi-restart.tar.xz
order modules, remove Data::Dumper, and reply to !restart in privaterestart
-rwxr-xr-xhacchi.pl11
1 files changed, 7 insertions, 4 deletions
diff --git a/hacchi.pl b/hacchi.pl
index b8339d0..7b9123f 100755
--- a/hacchi.pl
+++ b/hacchi.pl
@@ -2,13 +2,12 @@
use strict;
use warnings;
-use POE qw(Component::IRC);
-use Time::Duration;
-use LWP::UserAgent;
use File::Spec;
use File::Temp;
+use LWP::UserAgent;
+use POE qw(Component::IRC);
use Storable;
-use Data::Dumper;
+use Time::Duration;
my $nickname = 'hacchi';
my $ircpassword = '';
@@ -214,6 +213,10 @@ sub irc_msg {
$irc->yield( privmsg => $nick => "Read: http://ossowicki.com/?p=213");
}
+ if ( $what =~ /^!restart$/ ) {
+ $irc->yield( privmsg => $nick => "Please do that in a public channel" );
+ }
+
}
sub irc_whois {