[Rt-commit] r19234 - in rt/3.999/trunk/lib/RT: Action

[sartak at bestpractical.com]

Author: sartak
Date: Thu Apr 16 16:25:07 2009
New Revision: 19234

Added:
   rt/3.999/trunk/lib/RT/Action/CreateGroup.pm
Modified:
   rt/3.999/trunk/lib/RT/View/Admin/Groups.pm

Log:
Define an explicit CreateGroup action for creating user-defined groups

Added: rt/3.999/trunk/lib/RT/Action/CreateGroup.pm
==============================================================================
--- (empty file)
+++ rt/3.999/trunk/lib/RT/Action/CreateGroup.pm	Thu Apr 16 16:25:07 2009
@@ -0,0 +1,28 @@
+use strict;
+use warnings;
+
+=head1 NAME
+
+RT::Action::CreateGroup
+
+=cut
+
+package RT::Action::CreateGroup;
+use base qw/RT::Action RT::Action::Record::Create/;
+
+=head2 create_record
+
+This uses L<RT::Model::Group/create_user_defined> for creating user-defined
+groups.
+
+=cut
+
+sub create_record {
+    my $self  = shift;
+    my $group = $self->record;
+
+    return $group->create_user_defined(@_);
+}
+
+1;
+

Modified: rt/3.999/trunk/lib/RT/View/Admin/Groups.pm
==============================================================================
--- rt/3.999/trunk/lib/RT/View/Admin/Groups.pm	(original)
+++ rt/3.999/trunk/lib/RT/View/Admin/Groups.pm	Thu Apr 16 16:25:07 2009
@@ -58,10 +58,6 @@
 
 use constant display_columns => qw(id name description);
 
-private template 'new_item_region' => sub {
-    # can't create groups through CRUD UI
-};
-
 sub _current_collection {
     my $self = shift;
     my $c    = $self->SUPER::_current_collection();