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

[sartak at bestpractical.com]

The branch, master has been updated
       via  40cd8be887a26fbc86d381cead7d5bbed5f0402b (commit)
      from  89735cfb0dcabdf33bd902efde85cb77d886edc3 (commit)

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

- Log -----------------------------------------------------------------
commit 40cd8be887a26fbc86d381cead7d5bbed5f0402b
Author: Shawn M Moore <sartak at gmail.com>
Date:   Wed Apr 1 14:09:02 2009 -0400

    Similar superuser-ify action for DeleteTag

diff --git a/lib/App/Changeloggr/Action/DeleteTag.pm b/lib/App/Changeloggr/Action/DeleteTag.pm
new file mode 100644
index 0000000..0364395
--- /dev/null
+++ b/lib/App/Changeloggr/Action/DeleteTag.pm
@@ -0,0 +1,13 @@
+package App::Changeloggr::Action::DeleteTag;
+use strict;
+use warnings;
+use base 'App::Changeloggr::Action::Mixin::RequiresAdminToken', 'Jifty::Action::Record::Delete';
+
+sub take_action {
+    my $self = shift;
+    $self->record->current_user(App::Changeloggr::CurrentUser->superuser);
+    $self->SUPER::take_action(@_);
+}
+
+1;
+

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