Subject: | allow times of minutes in tasks |
Date: | Wed, 1 Mar 2006 16:28:14 -0500 |
To: | andy.lester [...] socialtext.com |
From: | "Matthew M. Liggett" <matt.liggett [...] socialtext.com> |
This lets you say things like 30m or 90m, which I would prefer to
0.5h, 1.5h, generally.
LMK if you disapprove.
-Matt
--- /usr/local/share/perl/5.8.4/App/HWD/Task.pm 2006-02-21
14:18:08.000000000 -0800
+++ App/HWD/Task.pm 2006-03-01 13:24:21.694941605 -0800
@@ -54,6 +54,7 @@
s/\s+$//;
/^#(\d+)$/ and $id = $1, next;
/^((\d*\.)?\d+)h$/ and $estimate = $1, next;
+ /^((\d*\.)?\d+)m$/ and $estimate = $1 / 60, next;
/^(added|deleted) (\S+)$/i and do {
my ($type,$date) = ($1,$2);
$date{$type} = $parser->parse_datetime($date);