[Rt-commit] r6764 - in rt/branches/3.7-EXPERIMENTAL: .
ruz at bestpractical.com
ruz at bestpractical.com
Thu Jan 18 10:53:00 EST 2007
Author: ruz
Date: Thu Jan 18 10:52:50 2007
New Revision: 6764
Modified:
rt/branches/3.7-EXPERIMENTAL/ (props changed)
rt/branches/3.7-EXPERIMENTAL/lib/RT/Interface/Web.pm
Log:
r4384 at cubic-pc: cubic | 2007-01-18 04:34:58 +0300
* drop TODO comment, done this improvement some time ago
Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT/Interface/Web.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT/Interface/Web.pm (original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT/Interface/Web.pm Thu Jan 18 10:52:50 2007
@@ -364,7 +364,7 @@
InitialPriority => $ARGS{'InitialPriority'},
FinalPriority => $ARGS{'FinalPriority'},
TimeLeft => $ARGS{'TimeLeft'},
- TimeEstimated => $ARGS{'TimeEstimated'},
+ TimeEstimated => $ARGS{'TimeEstimated'},
TimeWorked => $ARGS{'TimeWorked'},
Requestor => \@Requestors,
Cc => \@Cc,
@@ -405,10 +405,7 @@
}
}
-
- # XXX TODO This code should be about six lines. and badly needs refactoring.
-
- # {{{ turn new link lists into arrays, and pass in the proper arguments
+ # turn new link lists into arrays, and pass in the proper arguments
my %map = (
'new-DependsOn' => 'DependsOn',
'DependsOn-new' => 'DependedOnBy',
@@ -422,8 +419,6 @@
$create_args{ $map{ $key } } = [ grep $_, split ' ', $ARGS{ $key } ];
}
- # }}}
-
my ( $id, $Trans, $ErrMsg ) = $Ticket->Create(%create_args);
unless ( $id && $Trans ) {
More information about the Rt-commit
mailing list