diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-06-13 18:59:06 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-06-13 18:59:06 +0000 |
commit | 415f6d6e50b85d36fca61313d6797a85f6b10ae8 (patch) | |
tree | f57de207a0a8975c1397eaa547ab3d8e391a27e1 | |
parent | c2ce5afe017a9004b39e438ceb788895ce7322d2 (diff) | |
download | drakx-415f6d6e50b85d36fca61313d6797a85f6b10ae8.tar drakx-415f6d6e50b85d36fca61313d6797a85f6b10ae8.tar.gz drakx-415f6d6e50b85d36fca61313d6797a85f6b10ae8.tar.bz2 drakx-415f6d6e50b85d36fca61313d6797a85f6b10ae8.tar.xz drakx-415f6d6e50b85d36fca61313d6797a85f6b10ae8.zip |
(_remove_raw) adapt to URPM-4.2
-rw-r--r-- | perl-install/install/pkgs.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm index fa99cb730..9eb514028 100644 --- a/perl-install/install/pkgs.pm +++ b/perl-install/install/pkgs.pm @@ -1020,7 +1020,7 @@ sub _remove_raw { URPM::add_macro(URPM::expand('__dbi_cdb %__dbi_cdb nofsync')); my $db = open_rpm_db_rw() or die "error opening RPM database: ", URPM::rpmErrorString(); - my $trans = $db->create_transaction($::prefix); + my $trans = $db->create_transaction(); #- stuff remove all packages that matches $p, not a problem since $p has name-version-release format. $trans->remove($_) foreach @$to_remove; |