[Rt-commit] rt branch, admin_ui, updated. 5631a47529ad5f895b9d8e560d18a337a1baed6d
sunnavy at bestpractical.com
sunnavy at bestpractical.com
Wed Dec 16 02:16:17 EST 2009
The branch, admin_ui has been updated
via 5631a47529ad5f895b9d8e560d18a337a1baed6d (commit)
from 9fb13a654abab44db1c613ce4abf675b19884e45 (commit)
Summary of changes:
lib/RT/Action/SelectWorkflowMappings.pm | 37 +++++++++++++++++++++++++++++++
1 files changed, 37 insertions(+), 0 deletions(-)
create mode 100644 lib/RT/Action/SelectWorkflowMappings.pm
- Log -----------------------------------------------------------------
commit 5631a47529ad5f895b9d8e560d18a337a1baed6d
Author: sunnavy <sunnavy at bestpractical.com>
Date: Wed Dec 16 15:15:33 2009 +0800
add action SelectWorkflowMappings
diff --git a/lib/RT/Action/SelectWorkflowMappings.pm b/lib/RT/Action/SelectWorkflowMappings.pm
new file mode 100644
index 0000000..0dd3b03
--- /dev/null
+++ b/lib/RT/Action/SelectWorkflowMappings.pm
@@ -0,0 +1,37 @@
+use strict;
+use warnings;
+
+package RT::Action::SelectWorkflowMappings;
+use base qw/RT::Action Jifty::Action/;
+use RT::Workflow;
+use Scalar::Defer;
+
+sub arguments {
+ my $self = shift;
+ my $args = {};
+ for (qw/from to/) {
+ $args->{$_} = {
+ render_as => 'Select',
+ available_values => defer { [ RT::Workflow->list ] }
+ };
+ }
+ return $args;
+}
+
+=head2 take_action
+
+=cut
+
+sub take_action {
+ my $self = shift;
+
+ my $from = $self->argument_value('from');
+ my $to = $self->argument_value('to');
+ return unless $from && $to;
+ Jifty->web->_redirect(
+ "/admin/global/workflows/mappings?from=$from&to=$to&",
+ );
+}
+
+1;
+
-----------------------------------------------------------------------
More information about the Rt-commit
mailing list