Tests: Converted priority urgency coefficients to UDAs

This commit is contained in:
Paul Beckingham 2015-04-05 14:58:07 -04:00
parent 6b0d288da7
commit d98b6e5c0b

View file

@ -56,7 +56,9 @@ sub in_range
if (open my $fh, '>', $rc)
{
print $fh "data.location=.\n",
"urgency.priority.coefficient=10\n",
"urgency.uda.priority.H.coefficient=10\n",
"urgency.uda.priority.M.coefficient=6.5\n",
"urgency.uda.priority.L.coefficient=3\n",
"urgency.active.coefficient=10\n",
"urgency.project.coefficient=10\n",
"urgency.due.coefficient=10\n",
@ -330,7 +332,7 @@ like ($output, qr/urgency 5$/ms, "$ut: scheduled past = 5");
# urgency values between 0 and 1
qx {../src/task rc:$rc add 13 pri:H 2>&1};
$output = qx{../src/task rc:$rc rc.urgency.priority.coefficient:0.01234 46 info 2>&1};
$output = qx{../src/task rc:$rc rc.urgency.uda.priority.H.coefficient:0.01234 46 info 2>&1};
like ($output, qr/Urgency\s+0\.01$/ms, "$ut: near-zero urgency is truncated");
# Cleanup.