Mercurial > hg > egg-tcls

changeset 192:52d8fa967c24

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix timestamp parsing.
author Matti Hamalainen <ccr@tnsp.org>
date Fri, 13 Jun 2014 22:32:15 +0300
parents 127b1d0f874e
children 93ec73deebc5
files fetch_weather.pl
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/fetch_weather.pl	Fri Jun 13 21:43:53 2014 +0300
+++ b/fetch_weather.pl	Fri Jun 13 22:32:15 2014 +0300
@@ -59,8 +59,7 @@
 sub parse_timestamp($$)
 {
   # XXX: A bit of a hack, but it works.
-  return Time::Piece->strptime($_[0], "%OH:%OM")->epoch -
-         Time::Piece->strptime("00:00", "%OH:%OM")->epoch + $_[1];
+  return Time::Piece->strptime($_[0], "%OH:%OM")->epoch + $_[1];
 }