[Rt-commit] r18867 - rt/3.999/branches/datetime/share/html/Tools/Reports

sartak at bestpractical.com sartak at bestpractical.com
Thu Mar 19 17:04:12 EDT 2009


Author: sartak
Date: Thu Mar 19 17:04:03 2009
New Revision: 18867

Modified:
   rt/3.999/branches/datetime/share/html/Tools/Reports/CreatedByDates.html

Log:
CreatedByDates RT::DateTime-ification

Modified: rt/3.999/branches/datetime/share/html/Tools/Reports/CreatedByDates.html
==============================================================================
--- rt/3.999/branches/datetime/share/html/Tools/Reports/CreatedByDates.html	(original)
+++ rt/3.999/branches/datetime/share/html/Tools/Reports/CreatedByDates.html	Thu Mar 19 17:04:03 2009
@@ -53,20 +53,10 @@
 <%init>
 my $title = _("Created tickets in period, grouped by status");
 my $q = RT::Model::Queue->new( current_user => Jifty->web->current_user );
-my $before = RT::Date->new();
-my $after = RT::Date->new();
 my $query = 'Status != "deleted" ';
 
-
-if ($created_after) {
-    $after->set(format => 'unknown', value => $created_after);
-    $created_after = $after->as_string;
-}
-if ($created_before) {
-    $before->set(format => 'unknown', value => $created_before);
-    $created_before = $before->as_string;
-}
-
+my $after = RT::DateTime->new_from_string($created_after);
+my $before = RT::DateTime->new_from_string($created_before);
 
 $q->load_by_cols(name => $queue);
 </%init>
@@ -86,9 +76,9 @@
 
 <br /><&|/l&>Queue</&>: <& /Elements/SelectQueue, name => 'queue', named_values => 1, default => $q->id &>
 <br /><&|/l&>Tickets Created after</&>: 
-<& /Elements/SelectDate, name => 'created_after', default => ($created_after) ? $after->iso : ''&>
+<& /Elements/SelectDate, name => 'created_after', default => $after &>
 <br /><&|/l&>Tickets Created before</&>: 
-<& /Elements/SelectDate, name => 'created_before', default => ($created_before) ? $before->iso : ''&>
+<& /Elements/SelectDate, name => 'created_before', default => $before &>
 
 <& /Elements/Submit&>
 </form>


More information about the Rt-commit mailing list