[Rt-commit] r18437 - in rt/3.8/trunk: share/html/Admin/Tools

[sartak at bestpractical.com]

Author: sartak
Date: Tue Feb 17 20:46:12 2009
New Revision: 18437

Modified:
   rt/3.8/trunk/   (props changed)
   rt/3.8/trunk/share/html/Admin/Tools/Configuration.html

Log:
 r80230 at onn:  sartak | 2009-02-17 20:45:35 -0500
 Add an RT Size section to system config that counts: Tickets Queues Transactions Users and Groups


Modified: rt/3.8/trunk/share/html/Admin/Tools/Configuration.html
==============================================================================
--- rt/3.8/trunk/share/html/Admin/Tools/Configuration.html	(original)
+++ rt/3.8/trunk/share/html/Admin/Tools/Configuration.html	Tue Feb 17 20:46:12 2009
@@ -128,6 +128,20 @@
 % }
 </table>
 
+<h2><&|/l&>RT Size</&></h2>
+<table>
+<%PERL>
+for my $type (qw/Ticket Queue Transaction User Group/) {
+    my $class = 'RT::' . $type . 's';
+    my $collection = $class->new($RT::SystemUser);
+    $collection->UnLimit;
+    my $count = $collection->CountAll;
+</%PERL>
+<tr><th><% $type %>s</th>
+<td><% $count %></td></tr>
+% }
+</table>
+
 <h2><&|/l&>Perl configuration</&></h2>
 % require Config;
 <pre>