|
|
@ -2685,6 +2685,13 @@ sub main() {
|
|
|
|
# copy ARGV because getopt modifies it
|
|
|
|
# copy ARGV because getopt modifies it
|
|
|
|
my @ARGVORIG = @ARGV;
|
|
|
|
my @ARGVORIG = @ARGV;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
# obtain the correct defaults for the keyring locations that apt knows
|
|
|
|
|
|
|
|
# about
|
|
|
|
|
|
|
|
my $apttrusted
|
|
|
|
|
|
|
|
= `eval \$(apt-config shell v Dir::Etc::trusted/f); printf \$v`;
|
|
|
|
|
|
|
|
my $apttrustedparts
|
|
|
|
|
|
|
|
= `eval \$(apt-config shell v Dir::Etc::trustedparts/d); printf \$v`;
|
|
|
|
|
|
|
|
|
|
|
|
chomp(my $hostarch = `dpkg --print-architecture`);
|
|
|
|
chomp(my $hostarch = `dpkg --print-architecture`);
|
|
|
|
my $options = {
|
|
|
|
my $options = {
|
|
|
|
components => ["main"],
|
|
|
|
components => ["main"],
|
|
|
@ -2694,8 +2701,8 @@ sub main() {
|
|
|
|
mode => 'auto',
|
|
|
|
mode => 'auto',
|
|
|
|
dpkgopts => [],
|
|
|
|
dpkgopts => [],
|
|
|
|
aptopts => [],
|
|
|
|
aptopts => [],
|
|
|
|
apttrusted => "/etc/apt/trusted.gpg",
|
|
|
|
apttrusted => $apttrusted,
|
|
|
|
apttrustedparts => "/etc/apt/trusted.gpg.d",
|
|
|
|
apttrustedparts => $apttrustedparts,
|
|
|
|
noop => [],
|
|
|
|
noop => [],
|
|
|
|
setup_hook => [],
|
|
|
|
setup_hook => [],
|
|
|
|
essential_hook => [],
|
|
|
|
essential_hook => [],
|
|
|
|