From d06ea5bd1b00a0547e5afe4544baf28038ac95e4 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Fri, 31 Aug 2012 16:45:49 +0000
Subject: perl_checker cleanup

---
 urpm/install.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/urpm/install.pm b/urpm/install.pm
index c539af3c..1171579c 100644
--- a/urpm/install.pm
+++ b/urpm/install.pm
@@ -195,7 +195,7 @@ sub install {
 
     my $db = urpm::db_open_or_die_($urpm, !$options{test}); #- open in read/write mode unless testing installation.
 
-    my $trans = $db->create_transaction();
+    my $trans = $db->create_transaction;
     if ($trans) {
 	sys_log("transaction on %s (remove=%d, install=%d, upgrade=%d)", $urpm->{root} || '/', scalar(@{$remove || []}), scalar(values %$install), scalar(values %$upgrade));
 	$urpm->{log}(N("created transaction for installing on %s (remove=%d, install=%d, upgrade=%d)", $urpm->{root} || '/',
-- 
cgit v1.2.1