diff options
author | Marc Espie <espie@cvs.openbsd.org> | 2007-05-27 22:39:10 +0000 |
---|---|---|
committer | Marc Espie <espie@cvs.openbsd.org> | 2007-05-27 22:39:10 +0000 |
commit | 4f7c11ce3d4f59ddf41b15eef5275289bc5ad1f3 (patch) | |
tree | 7200693d168053114c316cf168a0427f02886204 /usr.sbin/pkg_add/OpenBSD/Replace.pm | |
parent | 8756806e88157acbf137829b65075261b8955a01 (diff) |
so save_old_libs becomes the first routine to handle full UpdateSets.
Diffstat (limited to 'usr.sbin/pkg_add/OpenBSD/Replace.pm')
-rw-r--r-- | usr.sbin/pkg_add/OpenBSD/Replace.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/usr.sbin/pkg_add/OpenBSD/Replace.pm b/usr.sbin/pkg_add/OpenBSD/Replace.pm index d5e863e6056..82b8f851524 100644 --- a/usr.sbin/pkg_add/OpenBSD/Replace.pm +++ b/usr.sbin/pkg_add/OpenBSD/Replace.pm @@ -1,5 +1,5 @@ # ex:ts=8 sw=4: -# $OpenBSD: Replace.pm,v 1.21 2007/05/27 22:34:24 espie Exp $ +# $OpenBSD: Replace.pm,v 1.22 2007/05/27 22:39:09 espie Exp $ # # Copyright (c) 2004-2006 Marc Espie <espie@openbsd.org> # @@ -361,8 +361,6 @@ sub save_old_libraries { my ($set, $state) = @_; - my $new_plist = $set->handle->{plist}; - for my $old_plist ($set->actual_replacements) { my $libs = {}; @@ -371,7 +369,9 @@ sub save_old_libraries print "Looking for changes in shared libraries\n" if $state->{beverbose}; $old_plist->mark_lib($libs, $p); - $new_plist->unmark_lib($libs, $p); + for my $n ($set->newer) { + $n->{plist}->unmark_lib($libs, $p); + } if (%$libs) { print "Libraries to keep: ", join(",", sort(keys %$libs)), "\n" |