[Bps-public-commit] App-Changeloggr branch, master, updated. d7d2d0afd76806c04ff4291dd436e5c7e6728d65

[sartak at bestpractical.com]

The branch, master has been updated
       via  d7d2d0afd76806c04ff4291dd436e5c7e6728d65 (commit)
      from  29659d4d5a5e486a76ee4e9c03e8be525d219d8a (commit)

Summary of changes:
 .../Action/{DeleteTag.pm => UpdateTag.pm}          |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)
 copy lib/App/Changeloggr/Action/{DeleteTag.pm => UpdateTag.pm} (65%)

- Log -----------------------------------------------------------------
commit d7d2d0afd76806c04ff4291dd436e5c7e6728d65
Author: Shawn M Moore <sartak at gmail.com>
Date:   Tue Jun 30 19:12:37 2009 -0400

    UpdateTag action which RequiresAdminToken

diff --git a/lib/App/Changeloggr/Action/UpdateTag.pm b/lib/App/Changeloggr/Action/UpdateTag.pm
new file mode 100644
index 0000000..7afdbf0
--- /dev/null
+++ b/lib/App/Changeloggr/Action/UpdateTag.pm
@@ -0,0 +1,18 @@
+package App::Changeloggr::Action::UpdateTag;
+use strict;
+use warnings;
+use base 'App::Changeloggr::Action::Mixin::RequiresAdminToken', 'Jifty::Action::Record::Update';
+
+sub take_action {
+    my $self = shift;
+    $self->record->current_user(App::Changeloggr::CurrentUser->superuser);
+    $self->SUPER::take_action(@_);
+}
+
+sub report_success {
+    my $self = shift;
+    $self->result->message(_('Updated the "%1" tag', $self->record->text));
+}
+
+1;
+

-----------------------------------------------------------------------