From 8fc4203c7786e025830027da80da50061ef86d22 Mon Sep 17 00:00:00 2001
From: Nicolas Vigier <boklm@mageia.org>
Date: Tue, 21 May 2013 20:57:18 +0000
Subject: Include epoch in svn path

---
 MgaRelease/Common.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/MgaRelease/Common.pm b/MgaRelease/Common.pm
index bd84df8..a4c38af 100644
--- a/MgaRelease/Common.pm
+++ b/MgaRelease/Common.pm
@@ -28,6 +28,7 @@ sub make_srpms_list_from_synthesis {
     $urpm->traverse(sub { 
             $srpms_list->{$_[0]->name}->{version} = $_[0]->version;
             $srpms_list->{$_[0]->name}->{release} = $_[0]->release;
+            $srpms_list->{$_[0]->name}->{epoch} = $_[0]->epoch if $_[0]->epoch;
         });
 }
 
@@ -55,7 +56,9 @@ sub get_srpms_rev {
     my $ra = SVN::Ra->new(config()->{svn_repourl});
     foreach my $pkg (keys %$srpms_list) {
         my ($ver, $rel) = @{$srpms_list->{$pkg}}{qw/version release/};
-        $svnrev = path_rev($ra, "cauldron/$pkg/releases/$ver/$rel");
+        my $epoch = $srpms_list->{$pkg}->{epoch} ?
+                $srpms_list->{$pkg}->{epoch} . ':' : '';
+        $svnrev = path_rev($ra, "cauldron/$pkg/releases/$epoch$ver/$rel");
         $srpms_list->{$pkg}->{svnrev} = $svnrev if $svnrev;
     }
 }
-- 
cgit v1.2.1