# HG changeset patch
# User Dominic Cleal <dominic@computerkb.co.uk>
# Date 1229773526 0
# Node ID 31a4d4cab76f679b6f4eb72d88d25fbee731fbc3
# Parent  bfd2b428d131e28702523fb2c6c5fd9ac6e9a291
Adding timezone field to friends file, used for !eta

diff -r bfd2b428d131 -r 31a4d4cab76f skillbot.pl
--- a/skillbot.pl	Fri Dec 19 12:53:37 2008 +0000
+++ b/skillbot.pl	Sat Dec 20 11:45:26 2008 +0000
@@ -240,7 +240,8 @@
 					}
 
 					my $finish = DateTime->from_epoch(
-							epoch => $f->{skill}->finish_time);
+							epoch => $f->{skill}->finish_time,
+							time_zone => $f->{tz});
 
 					$text = sprintf("Currently training %s %s ".
 									"(finish in %s, %s%s)",
@@ -397,7 +398,7 @@
 
 Read a list of friends from the friends_file.  Format is:
 
-user_id	api_key		IRC_nick	character_name
+user_id	api_key		IRC_nick	timezone	character_name
 
 Start a line with # for a comment.  Character name is optional, if left
 out then all characters will be monitored.
@@ -413,11 +414,12 @@
 		chomp;
 		next if (/^#/);
 
-		if (/^([0-9]+)\s+([a-z0-9]{64})\s+(\S+)(\s+(.+))?/i) {
+		if (/^([0-9]+)\s+([a-z0-9]{64})\s+(\S+)\s+(\S+)(\s+(.+))?/i) {
 			my $uid = $1;
 			my $key = $2;
 			my $nick = $3;
-			my $c = $5;
+			my $tz = $4;
+			my $c = $6;
 
 			if (! $frienduids{$uid}) {
 				my $api = WebService::EveOnline->new( { user_id => $uid,
@@ -429,7 +431,8 @@
 					push @friends, {
 						char => $character,
 						api => $api,
-						nick => $nick
+						nick => $nick,
+						tz => $tz
 					};
 					$loaded++;
 				}