[Bps-public-commit] r16950 - sd/trunk/lib/App/SD/Replica/rt

[ruz at bestpractical.com]

Author: ruz
Date: Thu Nov 20 11:44:01 2008
New Revision: 16950

Modified:
   sd/trunk/lib/App/SD/Replica/rt/PullEncoder.pm

Log:
* set created of the changeset with created from the txn

Modified: sd/trunk/lib/App/SD/Replica/rt/PullEncoder.pm
==============================================================================
--- sd/trunk/lib/App/SD/Replica/rt/PullEncoder.pm	(original)
+++ sd/trunk/lib/App/SD/Replica/rt/PullEncoder.pm	Thu Nov 20 11:44:01 2008
@@ -58,6 +58,7 @@
         $txn_counter++;
         $self->sync_source->log("Transcoding transaction  @{[$txn->{'id'}]} - $txn_counter of ". scalar @transactions);
         my $changeset = $self->transcode_one_txn( $txn, $tickets->{ $txn->{Ticket} }->{ticket} );
+        $changeset->created( $txn->{'Created'} );
         next unless $changeset->has_changes;
         unshift @changesets, $changeset;
     }