summaryrefslogtreecommitdiffstats
path: root/urpm
diff options
context:
space:
mode:
Diffstat (limited to 'urpm')
-rw-r--r--urpm/cfg.pm9
1 files changed, 5 insertions, 4 deletions
diff --git a/urpm/cfg.pm b/urpm/cfg.pm
index 2b50c6f9..2dd3a062 100644
--- a/urpm/cfg.pm
+++ b/urpm/cfg.pm
@@ -41,14 +41,14 @@ Returns 1 on success, 0 on failure.
our $err;
-sub _syntax_error () { $err = N("syntax error in config file at line %s") }
+sub _syntax_error () { $err = N("syntax error in config file at line %s", $.) }
sub load_config ($) {
my ($file) = @_;
my %config;
my $medium = undef;
$err = '';
- open my $f, $file or do { $err = "Can't read $file: $!\n"; return };
+ open my $f, $file or do { $err = N("unable to read config file [%s]", $file); return };
local $_;
while (<$f>) {
chomp;
@@ -82,12 +82,13 @@ sub load_config ($) {
|md5sum
|limit-rate
|excludepath
- |key[\-_]ids
|split-(?:level|length)
|priority-upgrade
|downloader
)\s*:\s*(.*)$/x
and $config{$medium}{$1} = $2, next;
+ /^key[-_]ids\s*:\s*(.*)$/
+ and $config{$medium}{'key-ids'} = $1, next;
#- positive flags
/^(update|ignore|synthesis|virtual)$/
and $config{$medium}{$1} = 1, next;
@@ -125,7 +126,7 @@ sub dump_config ($$) {
return $a cmp $b;
} keys %$config;
open my $f, '>', $file or do {
- $err = "Can't write to $file: $!\n";
+ $err = N("unable to write config file [%s]", $file);
return 0;
};
print $f "# generated ".(scalar localtime)."\n";