read_aplinfo_from_fh: use architecture to generate default file names

0c88ea0e · Dietmar Maurer · bfc517c0 · 0c88ea0e
Commit 0c88ea0e authored Jul 01, 2015 by Dietmar Maurer
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

APLInfo.pm PVE/APLInfo.pm +2 -1

No files found.
--- a/PVE/APLInfo.pm
+++ b/PVE/APLInfo.pm
@@ -107,7 +107,8 @@ sub read_aplinfo_from_fh {
 		$template = $res->{location};
 		$template =~ s|.*/([^/]+.tar.gz)|$1|;
 	    } else {
-		$template = "$res->{os}-$res->{package}_$res->{version}_i386.tar.gz";
+		my $arch = $res->{architecture} || 'i386';
+		$template = "$res->{os}-$res->{package}_$res->{version}_$arch.tar.gz";
 		$template =~ s/$res->{os}-$res->{os}-/$res->{os}-/;
 	    }
 	    $res->{source} = $source;