# HG changeset patch
# User William Roberts <williamr@symbian.org>
# Date 1252666021 -3600
# Node ID 8e73266ba54f5a87f3bbc784614c60940136cee8
# Parent  91ddff972035ce3224699e08c50682121455bbb7
Cope with PDK 2.0.c variation on build-info.xml format

diff -r 91ddff972035 -r 8e73266ba54f clone_packages/clone_all_packages.pl
--- a/clone_packages/clone_all_packages.pl	Thu Sep 10 13:11:03 2009 +0100
+++ b/clone_packages/clone_all_packages.pl	Fri Sep 11 11:47:01 2009 +0100
@@ -292,11 +292,13 @@
     my $revision; # set when processing build-info listings
     
     # build-info.xml format
+    # <baseline>//v800008/Builds01/mercurial_master_prod/sfl/MCL/sf/adaptation/stubs/#7:e086c7f635d5</baseline>
     # <baseline>//v800008/Builds01/mercurial_master_prod/sfl/MCL/sf/adaptation/stubs/#:e086c7f635d5</baseline>
-    if ($line =~ /<baseline>(.*)#:?([0-9a-z]+)<\/baseline>/i)
+    # <baseline>//v800008/Builds01/mercurial_master_prod/sfl/MCL/sf/adaptation/stubs/#e086c7f635d5</baseline>
+    if ($line =~ /<baseline>(.*)#(\d*:)?([0-9a-fA-F]+)<\/baseline>/i)
       {
       $line = $1;   # discard the wrapping
-      $revision = $2;
+      $revision = $3;
       }
  
     # Look for the oss/MCL/ prefix to a path e.g.