[cvs] fink/perlmod/Fink ChangeLog, 1.1619, 1.1620 FinkVersion.pm.in, 1.43, 1.44

[David R. M. <dm...@us...>]

Update of /cvsroot/fink/fink/perlmod/Fink
In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv16295

Modified Files:
	ChangeLog FinkVersion.pm.in 
Log Message:
take the current architecture into account when reporting the default 
binary distribution


Index: FinkVersion.pm.in
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/FinkVersion.pm.in,v
retrieving revision 1.43
retrieving revision 1.44
diff -u -d -r1.43 -r1.44
--- FinkVersion.pm.in	1 Apr 2009 04:38:19 -0000	1.43
+++ FinkVersion.pm.in	15 May 2009 22:21:52 -0000	1.44
@@ -105,8 +105,9 @@
 
 sub default_binary_version {
 	my $distribution = shift;
-	my %bindists = ("10.2-gcc3.3" => "0.6.4", "10.3" => "0.7.2", "10.4-transitional" => "0.8.0", "10.4" => "0.8.1", "10.5" => "0.9.0");
-	return $bindists{$distribution};
+	my $architecture = get_arch();
+	my %bindists = ("10.2-gcc3.3/powerpc" => "0.6.4", "10.3/powerpc" => "0.7.2", "10.4-transitional/powerpc" => "0.8.0", "10.4/powerpc" => "0.8.1", "10.4/i386" => "0.8.1", "10.5/powerpc" => "0.9.0", "10.5/i386" => "0.9.0");
+	return $bindists{"$distribution/$architecture"};
 }
 
 =item max_info_level

Index: ChangeLog
===================================================================
RCS file: /cvsroot/fink/fink/perlmod/Fink/ChangeLog,v
retrieving revision 1.1619
retrieving revision 1.1620
diff -u -d -r1.1619 -r1.1620
--- ChangeLog	15 May 2009 19:19:24 -0000	1.1619
+++ ChangeLog	15 May 2009 22:21:52 -0000	1.1620
@@ -3,6 +3,8 @@
 	* Services.pm: aptget_lockwait now specifies the full path to the
 	apt-get-lockwait executable, or, if that is unavailable, the full
 	path to the apt-get executable
+	* FinkVersion.pm.in: take the current architecture into account when 
+	reporting the default binary distribution
 
 2009-05-13  Dave Vasilevsky  <va...@us...>