dselect-ftp: don't use obsolete dpkg --print-installation-architecture

dselect/methods/ftp/setup

@@ -34,7 +34,7 @@ if ($option eq "manual") {
 #print "vardir: $vardir, method: $method, option: $option\n";
 
 #Defaults
-my $arch=`dpkg --print-installation-architecture`;
+my $arch=`dpkg --print-architecture`;
 $arch='i386' if $?;
 chomp $arch;
 

dselect/methods/ftp/update

@@ -46,7 +46,7 @@ if ($option eq "manual") {
 
 #print "vardir: $vardir, method: $method, option: $option\n";
 
-my $arch=`dpkg --print-installation-architecture`;
+my $arch=`dpkg --print-architecture`;
 $arch='i386' if $?;
 chomp $arch;
 my $exit = 0;