do_delete action now has exported attribute in ::Model::CDBI::Base

git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@577 48953598-375a-da11-a14b-00016c27c3ee

diff --git a/Changes b/Changes
index c884209c384d013a698990abfec6793f13a93cf1..61e9c046f6d4de3ca49892c09612fcad2965784f 100644 (file)
--- a/Changes
+++ b/Changes
@@ -6,6 +6,7 @@ For information about current developments and future releases, see:
 Bug Fixes :
    Apache::Request is fetched with a new object instead of instance if request options are provided
    additional, request_options and view_options attributes of Maypole::Config are initialised with hashref
+   do_delete action now has exported attribute in ::Model::CDBI::Base
 
 2.12  22 June 2007 
 

diff --git a/lib/Maypole/Model/CDBI/Base.pm b/lib/Maypole/Model/CDBI/Base.pm
index d933c5bb1006b4d25f5fe8ab24fb2a799c8d9dc2..ec88942762e7b58d0f0a4930484bec39be9a0d31 100644 (file)
--- a/lib/Maypole/Model/CDBI/Base.pm
+++ b/lib/Maypole/Model/CDBI/Base.pm
@@ -183,8 +183,7 @@ sub delete : Exported {
   }
 }
 
-
-sub do_delete {
+sub do_delete : Exported {
   my ( $self, $r ) = @_;
   # FIXME: handle fatal error with exception
   $_->SUPER::delete for @{ $r->objects || [] };