[Bps-public-commit] App-Changeloggr branch, master, updated. d7d2d0afd76806c04ff4291dd436e5c7e6728d65
sartak at bestpractical.com
sartak at bestpractical.com
Tue Jun 30 19:12:46 EDT 2009
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;
+
-----------------------------------------------------------------------
More information about the Bps-public-commit
mailing list