[Rt-commit] r3273 - in rt/branches/QUEBEC-EXPERIMENTAL: . html

[alexmv at bestpractical.com]

Author: alexmv
Date: Fri Jul  1 00:46:49 2005
New Revision: 3273

Modified:
   rt/branches/QUEBEC-EXPERIMENTAL/   (props changed)
   rt/branches/QUEBEC-EXPERIMENTAL/html/autohandler
Log:
 r4557 at zoq-fot-pik:  chmrr | 2005-06-30 20:44:33 -0400
  * Fractional units


Modified: rt/branches/QUEBEC-EXPERIMENTAL/html/autohandler
==============================================================================
--- rt/branches/QUEBEC-EXPERIMENTAL/html/autohandler	(original)
+++ rt/branches/QUEBEC-EXPERIMENTAL/html/autohandler	Fri Jul  1 00:46:49 2005
@@ -74,6 +74,9 @@
 foreach my $field (@TimeUnitFields) { 
     next unless ($field =~ /^(.*?)-TimeUnits$/i);
     my $local = $1;
+    $ARGS{$local} =~ s|\b (\d* \s+) (\d+)/(\d+) \b
+                      |$1 + ($3 == 0 ? 0 : ($2 / $3))
+                      |xe;
     if ($ARGS{$field} =~ /hours/i) {
         $ARGS{$local} *= 60;
     }