[Pkg-ocaml-maint-commits] r6385 - /trunk/tools/scripts/get_sources_from_archive.sh

[glondu-guest at users.alioth.debian.org]

Author: glondu-guest
Date: Fri Jun 19 09:57:33 2009
New Revision: 6385

URL: http://svn.debian.org/wsvn/?sc=1&rev=6385
Log:
Ignore epoch in version numbers

Modified:
    trunk/tools/scripts/get_sources_from_archive.sh

Modified: trunk/tools/scripts/get_sources_from_archive.sh
URL: http://svn.debian.org/wsvn/trunk/tools/scripts/get_sources_from_archive.sh?rev=6385&op=diff
==============================================================================
--- trunk/tools/scripts/get_sources_from_archive.sh (original)
+++ trunk/tools/scripts/get_sources_from_archive.sh Fri Jun 19 09:57:33 2009
@@ -35,6 +35,6 @@
     cd "$SUITE"
     wget -O - "ftp://ftp.fr.debian.org/debian/dists/$SUITE/main/source/Sources.bz2" | bzcat > Sources
     grep-dctrl -FBuild-Depends ocaml -sPackage,Version,Directory Sources \
-        | awk '/^Package:/{PKG=$2};/^Version:/{VER=$2};/^Directory:/{DIR=$2};/^$/{printf "%s %s/%s_%s.dsc\n",PKG,DIR,PKG,VER}' \
+        | awk '/^Package:/{PKG=$2};/^Version:/{VER=$2;sub(/^[^:]+:/,"",VER)};/^Directory:/{DIR=$2};/^$/{printf "%s %s/%s_%s.dsc\n",PKG,DIR,PKG,VER}' \
         | while read a b; do get_package "$a" "$b"; done
 )