[Rt-commit] r15862 - in rt/branches/3.999-DANGEROUS: lib/RT/Model

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Mon Sep  8 23:45:45 2008
New Revision: 15862

Modified:
   rt/branches/3.999-DANGEROUS/   (props changed)
   rt/branches/3.999-DANGEROUS/lib/RT/Model/ACE.pm

Log:
 r16551 at sunnavys-mb:  sunnavy | 2008-09-09 11:45:16 +0800
 added delete method for ACE.pm because we want a different returned msg


Modified: rt/branches/3.999-DANGEROUS/lib/RT/Model/ACE.pm
==============================================================================
--- rt/branches/3.999-DANGEROUS/lib/RT/Model/ACE.pm	(original)
+++ rt/branches/3.999-DANGEROUS/lib/RT/Model/ACE.pm	Mon Sep  8 23:45:45 2008
@@ -452,6 +452,23 @@
     return 1;
 }
 
+=head2 delete
+
+Delete this record object from the database.
+
+=cut
+
+sub delete {
+    my $self = shift;
+    my ($rv) = $self->SUPER::delete;
+    if ($rv) {
+        return ( $rv, _("Right revoked") );
+    } else {
+
+        return ( 0, _("Right could not be revoked") );
+    }
+}
+
 # Helper for Delete with no ACL check
 sub _delete { return (shift)->__delete( @_ ) }
 sub __delete {