diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2008-03-14 10:25:13 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2008-03-14 10:25:13 +0000 |
commit | 3280b0b98fc13df3053f9735b94bdc9828f5537c (patch) | |
tree | 33dd93fa30ecb7b85d8bfb8894ad56290f11ad94 | |
parent | 0f1482c693a526ee4926f37f590df3b93fa13aeb (diff) | |
download | drakx-backup-do-not-use-3280b0b98fc13df3053f9735b94bdc9828f5537c.tar drakx-backup-do-not-use-3280b0b98fc13df3053f9735b94bdc9828f5537c.tar.gz drakx-backup-do-not-use-3280b0b98fc13df3053f9735b94bdc9828f5537c.tar.bz2 drakx-backup-do-not-use-3280b0b98fc13df3053f9735b94bdc9828f5537c.tar.xz drakx-backup-do-not-use-3280b0b98fc13df3053f9735b94bdc9828f5537c.zip |
add $line_nb in message
-rw-r--r-- | perl-install/pkgs.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index 6856992cb..405bfe75b 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -67,10 +67,10 @@ sub read_rpmsrate_raw { } elsif (@diff1 == 1 && @diff2 == 1) { @new_flags = (@common, join('||', $diff1[0], $diff2[0])); } else { - log::l("can not handle complicate flags for packages appearing twice ($name)"); + log::l("$line_nb: can not handle complicate flags for packages appearing twice ($name)"); $fatal_error++; } - log::l("package $name appearing twice with different rates ($rate != " . $rates{$name} . ")") if $rate != $rates{$name}; + log::l("$line_nb: package $name appearing twice with different rates ($rate != " . $rates{$name} . ")") if $rate != $rates{$name}; } $rates{$name} = $rate; $flags{$name} = \@new_flags; |