diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2005-09-20 12:18:03 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2005-09-20 12:18:03 +0000 |
| commit | a11fca5b3c9012101b833cc78b985b872680016e (patch) | |
| tree | 2fb00e0519519ff0e1dc0c80fbb3636dc0584d6b /perl-install | |
| parent | 9a364905f254fc7c73d5396e055aeef4d93f7248 (diff) | |
| download | drakx-a11fca5b3c9012101b833cc78b985b872680016e.tar drakx-a11fca5b3c9012101b833cc78b985b872680016e.tar.gz drakx-a11fca5b3c9012101b833cc78b985b872680016e.tar.bz2 drakx-a11fca5b3c9012101b833cc78b985b872680016e.tar.xz drakx-a11fca5b3c9012101b833cc78b985b872680016e.zip | |
don't warn lisa (which is installed by default)
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/pkgs.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm index f24984471..442fef990 100644 --- a/perl-install/pkgs.pm +++ b/perl-install/pkgs.pm @@ -582,6 +582,9 @@ sub read_rpmsrate_raw { my ($rates, $flags) = partition { /^\d$/ } @m; my ($rate) = @$rates or die sprintf qq(missing rate for "%s" at line %d (flags are %s)\n), $data, $line_nb, join('&&', @m); foreach my $name (split ' ', $data) { + if (uc($name) eq $name) { + log::l("$name is parsed as a package name, not as a flag"); + } if (member('INSTALL', @$flags)) { push @need_to_copy, $name if !member('NOCOPY', @$flags); next; #- do not need to put INSTALL flag for a package. @@ -1463,7 +1466,6 @@ ucd-snmp my @new_92 = qw( clusternfs gkrellm-server -lisa mon net-snmp openldap-servers @@ -1486,6 +1488,7 @@ spamassassin-spamd ); my @not_warned = qw( +lisa nfs-utils-clients portmap howl |