Module: tools Branch: master Commit: 0b92f47d3ca1b10eb1f085198642965506c6c660 URL: http://source.winehq.org/git/tools.git/?a=commit;h=0b92f47d3ca1b10eb1f085198...
Author: Alexandre Julliard julliard@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@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;