diff options
| author | Marc Espie <espie@cvs.openbsd.org> | 2007-05-02 15:05:31 +0000 |
|---|---|---|
| committer | Marc Espie <espie@cvs.openbsd.org> | 2007-05-02 15:05:31 +0000 |
| commit | 850d571d26f7956f8733a9655f093a52d3e5ff3c (patch) | |
| tree | d3b1f142fed89e3d021fa6d8d76f47a22cf06a32 /usr.sbin/pkg_add/OpenBSD/CollisionReport.pm | |
| parent | 7d7f634945a396998c775ed73d62bde8ad4cc3f4 (diff) | |
$o->method() becomes $o->method
Diffstat (limited to 'usr.sbin/pkg_add/OpenBSD/CollisionReport.pm')
| -rw-r--r-- | usr.sbin/pkg_add/OpenBSD/CollisionReport.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/CollisionReport.pm b/usr.sbin/pkg_add/OpenBSD/CollisionReport.pm index 74989fac3fe..6704d1a1eb2 100644 --- a/usr.sbin/pkg_add/OpenBSD/CollisionReport.pm +++ b/usr.sbin/pkg_add/OpenBSD/CollisionReport.pm @@ -1,5 +1,5 @@ # ex:ts=8 sw=4: -# $OpenBSD: CollisionReport.pm,v 1.10 2007/04/15 10:17:29 espie Exp $ +# $OpenBSD: CollisionReport.pm,v 1.11 2007/05/02 15:05:29 espie Exp $ # # Copyright (c) 2003-2006 Marc Espie <espie@openbsd.org> # @@ -26,7 +26,7 @@ use OpenBSD::Vstat; sub collision_report($$) { my ($list, $state) = @_; - my %todo = map {($_->fullname(), $_->{md5})} @$list; + my %todo = map {($_->fullname, $_->{md5})} @$list; my $bypkg = {}; my $clueless_bat = 0; my $clueless_bat2 = 0; @@ -49,8 +49,8 @@ sub collision_report($$) my $plist = OpenBSD::PackingList->from_installation($pkg, \&OpenBSD::PackingList::FilesOnly); for my $item (@{$plist->{items}}) { - next unless $item->IsFile(); - my $name = $item->fullname(); + next unless $item->IsFile; + my $name = $item->fullname; if (defined $todo{$name}) { $bypkg->{$pkg} = [] unless defined $bypkg->{$pkg}; push(@{$bypkg->{$pkg}}, $name); |