From: Arthur Axel "fREW" Schmidt <frioux@gmail.com>
Date: Fri, 30 Apr 2010 15:14:55 +0000 (+0000)
Subject: release 0.900001_06
X-Git-Tag: v0.900201~12
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2ffcef128abfd221b77adcf97d55806aad4627f8;p=dbsrgits%2FDBIx-Class-Journal.git

release 0.900001_06
---

diff --git a/Changes b/Changes
index f581edd..b8bbc48 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,6 @@
+0.900001_06 2010-04-30
+    - Fixed silly bug where update and delete didn't return what they were supposed to
+
 0.900001_05 2010-04-29
     - Removed undocumented override of deploy()
     - Added prepopulate_journal() to bootstrap insert logs, for retrofitting (oliver)
diff --git a/lib/DBIx/Class/Journal.pm b/lib/DBIx/Class/Journal.pm
index 9a20438..54e0b9d 100644
--- a/lib/DBIx/Class/Journal.pm
+++ b/lib/DBIx/Class/Journal.pm
@@ -5,7 +5,7 @@ use base qw/DBIx::Class/;
 use strict;
 use warnings;
 
-our $VERSION = '0.900001_05';
+our $VERSION = '0.900001_06';
 $VERSION = eval $VERSION; # no errors in dev versions
 
 ## On create/insert, add new entry to AuditLog and new content to AuditHistory
@@ -40,8 +40,9 @@ sub journal_log_insert {
 
 sub delete {
     my $self = shift;
-    $self->next::method(@_);
+    my $ret = $self->next::method(@_);
     $self->journal_log_delete(@_);
+    return $ret
 }
 
 sub journal_log_delete {
@@ -57,8 +58,9 @@ sub journal_log_delete {
 
 sub update {
     my $self = shift;
-    $self->next::method(@_);
+    my $ret = $self->next::method(@_);
     $self->journal_log_update(@_);
+    return $ret
 }
 
 sub journal_log_update {