changeset 61:2328f73e25a8

Fixing undefined variable on init
author Dominic Cleal <dominic@computerkb.co.uk>
date Wed, 31 Dec 2008 12:12:24 +0000
parents 69d7a89d3adc
children f620582dee33
files skillbot.pl
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/skillbot.pl	Mon Dec 29 14:42:46 2008 +0000
+++ b/skillbot.pl	Wed Dec 31 12:12:24 2008 +0000
@@ -60,9 +60,9 @@
 print PIDFILE "$$\n";
 close(PIDFILE) or die "can't close $config{'pidfile'}: $!";
 
-update_friends(undef);
+my $irc = new Net::IRC;
 
-my $irc = new Net::IRC;
+update_friends($irc);
 
 my $conn = $irc->newconn(Server => $config{'target_server'},
 			 Port   => $config{'target_port'},