[Bps-public-commit] r15851 - in SVN-Mirror/trunk: lib/SVN/Mirror

[clkao at bestpractical.com]

Author: clkao
Date: Mon Sep  8 07:38:49 2008
New Revision: 15851

Modified:
   SVN-Mirror/trunk/   (props changed)
   SVN-Mirror/trunk/lib/SVN/Mirror/Ra.pm

Log:
 r381 at mtl:  glasser | 2006-10-26 19:49:43 +0800
 Fix a bug introduced in r380, where svn:date properties
 were not being mirrored.  (Test added in SVK.)
 
 * lib/SVN/Mirror/RA.pm
   (committed): Set svn:date revprop after commit, since a commit
   overrides it.


Modified: SVN-Mirror/trunk/lib/SVN/Mirror/Ra.pm
==============================================================================
--- SVN-Mirror/trunk/lib/SVN/Mirror/Ra.pm	(original)
+++ SVN-Mirror/trunk/lib/SVN/Mirror/Ra.pm	Mon Sep  8 07:38:49 2008
@@ -165,7 +165,7 @@
 
 sub _new_ra {
     my ($self, %arg) = @_;
-    $self->{config} ||= SVN::Core::config_get_config (undef, $self->{pool});
+    $self->{config} ||= SVN::Core::config_get_config(undef, $self->{pool});
     $self->{auth} ||= $self->_new_auth;
 
     SVN::Ra->new( url => $self->{rsource},
@@ -323,6 +323,11 @@
     my ($self, $revmap, $date, $sourcerev, $rev) = @_;
     $self->{headrev} = $rev;
 
+    # Even though we set this on the transaction, we need to set it
+    # again after commit, since the fs will always make it the current
+    # time after committing.
+    $self->{fs}->change_rev_prop($rev, 'svn:date', $date);
+
     $self->unlock ('mirror');
     print "Committed revision $rev from revision $sourcerev.\n";
 }