diff options
| author | Marc Espie <espie@cvs.openbsd.org> | 2011-11-25 23:58:41 +0000 |
|---|---|---|
| committer | Marc Espie <espie@cvs.openbsd.org> | 2011-11-25 23:58:41 +0000 |
| commit | 893f80d6448e8933a169dc1439c77f8a5ec141d9 (patch) | |
| tree | 2d98459c0323cc50366844bd449c7de01b8ddfe4 | |
| parent | 01675c71521bd185d7f7ca5bbb67733f4b92b460 (diff) | |
darn, setlist might actually be undefined entirely...
noticed by nigel
| -rw-r--r-- | usr.sbin/pkg_add/OpenBSD/PkgDelete.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/PkgDelete.pm b/usr.sbin/pkg_add/OpenBSD/PkgDelete.pm index 5e8f5f63bc0..9dc8d5d2f65 100644 --- a/usr.sbin/pkg_add/OpenBSD/PkgDelete.pm +++ b/usr.sbin/pkg_add/OpenBSD/PkgDelete.pm @@ -1,6 +1,6 @@ #!/usr/bin/perl # ex:ts=8 sw=4: -# $OpenBSD: PkgDelete.pm,v 1.25 2011/11/25 09:25:59 espie Exp $ +# $OpenBSD: PkgDelete.pm,v 1.26 2011/11/25 23:58:40 espie Exp $ # # Copyright (c) 2003-2010 Marc Espie <espie@openbsd.org> # @@ -380,7 +380,7 @@ sub main my ($self, $state) = @_; if ($state->{automatic}) { - if (@{$state->{setlist}} == 0) { + if (!defined $state->{setlist}) { my $inst = $state->repo->installed; for my $l (@{$inst->locations_list}) { $self->add_location($state, $l); |