diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2012-06-07 00:56:06 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2012-06-07 00:56:06 -0700 |
| commit | 43a06151e47d2c59b833cbd8c26d97865ee850b6 (patch) | |
| tree | 42c51d94e7fa265461b508d061562be204ccc2c1 /rt/lib/RT/Report | |
| parent | 6587f6ba7d047ddc1686c080090afe7d53365bd4 (diff) | |
starting to work...
Diffstat (limited to 'rt/lib/RT/Report')
| -rw-r--r-- | rt/lib/RT/Report/Tickets.pm | 6 | ||||
| -rw-r--r-- | rt/lib/RT/Report/Tickets/Entry.pm | 6 |
2 files changed, 8 insertions, 4 deletions
diff --git a/rt/lib/RT/Report/Tickets.pm b/rt/lib/RT/Report/Tickets.pm index c60148518..af6e4ed15 100644 --- a/rt/lib/RT/Report/Tickets.pm +++ b/rt/lib/RT/Report/Tickets.pm @@ -2,7 +2,7 @@ # # COPYRIGHT: # -# This software is Copyright (c) 1996-2011 Best Practical Solutions, LLC +# This software is Copyright (c) 1996-2012 Best Practical Solutions, LLC # <sales@bestpractical.com> # # (Except where explicitly superseded by other copyright notices) @@ -69,7 +69,7 @@ sub Groupings { } - for my $field (qw(Due Resolved Created LastUpdated Started Starts)) { + for my $field (qw(Due Resolved Created LastUpdated Started Starts Told)) { for my $frequency (qw(Hourly Daily Monthly Annually)) { my $item = $field.$frequency; push @fields, $item, $item; @@ -296,7 +296,7 @@ sub Next { sub NewItem { my $self = shift; - return RT::Report::Tickets::Entry->new($RT::SystemUser); # $self->CurrentUser); + return RT::Report::Tickets::Entry->new(RT->SystemUser); # $self->CurrentUser); } diff --git a/rt/lib/RT/Report/Tickets/Entry.pm b/rt/lib/RT/Report/Tickets/Entry.pm index 158e5534d..f3eeb4d69 100644 --- a/rt/lib/RT/Report/Tickets/Entry.pm +++ b/rt/lib/RT/Report/Tickets/Entry.pm @@ -2,7 +2,7 @@ # # COPYRIGHT: # -# This software is Copyright (c) 1996-2011 Best Practical Solutions, LLC +# This software is Copyright (c) 1996-2012 Best Practical Solutions, LLC # <sales@bestpractical.com> # # (Except where explicitly superseded by other copyright notices) @@ -47,6 +47,10 @@ # END BPS TAGGED BLOCK }}} package RT::Report::Tickets::Entry; + +use warnings; +use strict; + use base qw/RT::Record/; # XXX TODO: how the heck do we acl a report? |