Alexandre Julliard : update-winehq: Get the download URL from the ANNOUNCE file.

Tue Jan 31 07:55:35 CST 2017

Module: tools
Branch: master
Commit: 0b92f47d3ca1b10eb1f085198642965506c6c660
URL:    http://source.winehq.org/git/tools.git/?a=commit;h=0b92f47d3ca1b10eb1f085198642965506c6c660

Author: Alexandre Julliard <julliard at winehq.org>
Date:   Tue Jan 31 14:45:08 2017 +0100

update-winehq: Get the download URL from the ANNOUNCE file.

Signed-off-by: Alexandre Julliard <julliard at winehq.org>

---

 update-winehq | 13 +++++++++++--
 1 file changed, 11 insertions(+), 2 deletions(-)

diff --git a/update-winehq b/update-winehq
index efcf1d5..4ba11d4 100755
--- a/update-winehq
+++ b/update-winehq
@@ -36,6 +36,7 @@ open ANNOUNCE, $ARGV[1] || "ANNOUNCE" or die "cannot open ANNOUNCE";
 my $whats_new = 0;
 my $release_notes = 0;
 my $first = 1;
+my $url;
 
 push @text, "<body>\n<p>";
 
@@ -90,9 +91,17 @@ while (<ANNOUNCE>)
     }
 }
 
-(my $dir = $rel) =~ s/^([0-9]+\.[0-9]+).*/$1/;
+while (<ANNOUNCE>)
+{
+    if (/https?:(\/\/dl.winehq.org\/wine\/source\/.*\/wine-$rel\..*)$/)
+    {
+        $url = $1;
+        last;
+    }
+}
+die "Download URL not found" unless $url;
 
-push @text, "<p>The source is <a href=\"//dl.winehq.org/wine/source/$dir/wine-$rel.tar.bz2\">available now</a>.\n";
+push @text, "<p>The source is <a href=\"$url\">available now</a>.\n";
 push @text, "Binary packages are in the process of being built, and will appear soon at their respective <a href=\"{\$root}/download\">download locations</a>.\n";
 push @text, "</p></body></news>\n";
 close ANNOUNCE;


