Mercurial > hg > skillbot
changeset 47:31a4d4cab76f
Adding timezone field to friends file, used for !eta
author | Dominic Cleal <dominic@computerkb.co.uk> |
---|---|
date | Sat, 20 Dec 2008 11:45:26 +0000 |
parents | bfd2b428d131 |
children | 75b3b76a1643 |
files | skillbot.pl |
diffstat | 1 files changed, 8 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- 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++; }