changeset 45:1d349044c860

Add finish day and time to !eta
author Dominic Cleal <dominic@computerkb.co.uk>
date Fri, 19 Dec 2008 12:46:10 +0000
parents f7abbe853f5d
children bfd2b428d131
files skillbot.pl
diffstat 1 files changed, 8 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/skillbot.pl	Wed Dec 17 00:17:45 2008 +0000
+++ b/skillbot.pl	Fri Dec 19 12:46:10 2008 +0000
@@ -23,9 +23,9 @@
 use WebService::EveOnline;
 use Data::Dumper;
 use Net::IRC;
-use HTML::Entities;
 use POSIX;
 use Encode;
+use DateTime;
 
 require 'timers.pl';
 
@@ -238,9 +238,14 @@
 						$downtime = ", coincides with downtime";
 					}
 
-					$text = sprintf("Currently training %s %s (finish in %s%s)",
+					my $finish = DateTime->from_epoch(
+							epoch => $f->{skill}->finish_time);
+
+					$text = sprintf("Currently training %s %s ".
+									"(finish in %s, %s%s)",
 									$f->{skill}->name, $f->{skill}->level,
-									$f->{skill}->time_remaining, $downtime)
+									$f->{skill}->time_remaining,
+									$finish->strftime("%A %R"), $downtime)
 				} else {
 					$text = "No skill currently training";
 				}