From 6113d4095b6559c031c970a2456f09bf6dbaa803 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 31 Mar 2008 22:25:01 +0000 Subject: minor perl_checker cleanup --- Rpmdrake/pkg.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Rpmdrake') diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index 3fa719c1..57b7fc5d 100644 --- a/Rpmdrake/pkg.pm +++ b/Rpmdrake/pkg.pm @@ -811,7 +811,7 @@ you may now inspect some in order to take actions:"), my $i; foreach (@argv) { $i++; - splice @argv, $i-1, 2 if /^--embedded$/ + splice @argv, $i-1, 2 if /^--embedded$/; } alarm(0); # remember not to ask again questions and the like: -- cgit v1.2.1