# HG changeset patch
# User Dominic Cleal <dominic@computerkb.co.uk>
# Date 1229690770 0
# Node ID 1d349044c8601241f0d701b78d6f2202f71c22da
# Parent  f7abbe853f5d81e13b7664db00ea32cde0d8272e
Add finish day and time to !eta

diff -r f7abbe853f5d -r 1d349044c860 skillbot.pl
--- 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";
 				}