- 'export' => sub { _set_mode(@_); $export_to = $_[1]; },
- 'import' => sub { _set_mode(@_); $import_from = $_[1]; },
+ 'export=s' => sub { _set_mode(@_); $export_to = $_[1]; },
+ 'import=s' => sub { _set_mode(@_); $import_from = $_[1]; },
'manual-edit' => \&_set_mode,
'distribution-architectures' => \&_set_mode,
'distribution-aliases' => \&_set_mode,
) or usage();
$list_min_age = -1 * $list_max_age if $list_max_age;
'manual-edit' => \&_set_mode,
'distribution-architectures' => \&_set_mode,
'distribution-aliases' => \&_set_mode,
) or usage();
$list_min_age = -1 * $list_max_age if $list_max_age;
my( $name, $pkg, $key, $data );
foreach $name (@_) {
my( $name, $pkg, $key, $data );
foreach $name (@_) {