[Bast-commits] r9226 - DBIx-Class-Journal/1.000/trunk/lib/DBIx/Class

[oliver at dev.catalyst.perl.org]

Author: oliver
Date: 2010-04-26 22:20:20 +0100 (Mon, 26 Apr 2010)
New Revision: 9226

Modified:
   DBIx-Class-Journal/1.000/trunk/lib/DBIx/Class/Journal.pm
Log:
simplify previous change, no need to re-retrieve the row because $self is already in_storage so is what we want

Modified: DBIx-Class-Journal/1.000/trunk/lib/DBIx/Class/Journal.pm
===================================================================
--- DBIx-Class-Journal/1.000/trunk/lib/DBIx/Class/Journal.pm	2010-04-26 21:06:13 UTC (rev 9225)
+++ DBIx-Class-Journal/1.000/trunk/lib/DBIx/Class/Journal.pm	2010-04-26 21:20:20 UTC (rev 9226)
@@ -64,12 +64,10 @@
 sub journal_log_update {
     my $self = shift;
 
-    if($self->in_storage) {
+    if ($self->in_storage) {
         my $j = $self->_journal_schema;
-
         my $change_id = $j->journal_create_change->id;
-        my $prev = $self->result_source->resultset->find( $self->ident_condition );
-        $j->journal_record_in_history( $prev, audit_change_id => $change_id );
+        $j->journal_record_in_history( $self, audit_change_id => $change_id );
     }
 }