[gnomeweb-wml] cheese: Update update.pl for .tar.xz releases
- From: David King <davidk src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [gnomeweb-wml] cheese: Update update.pl for .tar.xz releases
- Date: Thu, 8 Sep 2011 14:59:51 +0000 (UTC)
commit 21ad62d6ed126594a07194356732047dbc6e3c00
Author: David King <amigadave amigadave com>
Date: Thu Sep 8 11:28:36 2011 +0200
cheese: Update update.pl for .tar.xz releases
projects.gnome.org/cheese/update.pl | 9 ++++++---
1 files changed, 6 insertions(+), 3 deletions(-)
---
diff --git a/projects.gnome.org/cheese/update.pl b/projects.gnome.org/cheese/update.pl
index fc8cddd..92c5ac2 100755
--- a/projects.gnome.org/cheese/update.pl
+++ b/projects.gnome.org/cheese/update.pl
@@ -61,8 +61,11 @@ for (@maindir) {
@dir = $gnomeftp->ls("$_");
for (@dir) {
$current_file = $_;
- m/^(.*)\.(.*)\/(.*)\.tar\.gz/g or next;
- $filename = "$3.tar.gz";
+ if (m/^(.*)\.(.*)\/(.*)(\.[\d\.]+)?\.tar\.gz/g) {
+ $filename = "$3.tar.gz";
+ } elsif (m/^(.*)\.(.*)\/(.*)(\.[\d\.]+)?\.tar\.xz/g) {
+ $filename = "$3.tar.xz";
+ } else { next; }
$packages{$filename}{"news"} = "$3\.changes";
$packages{$filename}{"url"} =
"http://ftp.gnome.org/pub/GNOME/sources/cheese/$current_file";
@@ -84,7 +87,7 @@ for (@maindir) {
or die "Cannot retrieve mtime ", $ftp->message;
$packages{$filename}{"epoch"} = $mdtm - 3600;
$packages{$filename}{"mdtm"} = time2str ("%B %o %Y", $mdtm, "GMT");
- if ($filename =~ m/.*-(\d+\.\d+.\d+)(\.[\d\.]+)?\.tar\.gz/) {
+ if ($filename =~ m/.*-(\d+\.\d+.\d+)(\.[\d\.]+)?\.tar\.gz/ or $filename =~ m/.*-(\d+\.\d+.\d+)(\.[\d\.]+)?\.tar\.xz/) {
$packages{$filename}{"release"} = "$1" . ($2 or "");
}
}
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]