From bd1cb2f93661d1c635551be7adb5cf2bc6299f13 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 11 Jun 2001 16:33:04 +0000
Subject: (grep_): add a missing semi-colon

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

(limited to 'perl-install')

diff --git a/perl-install/commands.pm b/perl-install/commands.pm
index c6f8100e9..291161943 100644
--- a/perl-install/commands.pm
+++ b/perl-install/commands.pm
@@ -50,7 +50,7 @@ sub grep_ {
     @_ == 0 || $h and die "usage: grep <regexp> [files...]\n";
     my $r = shift;
     $r = qr/$r/i if $i;
-    @ARGV = @_; (/$r/ ? $v || print : $v && print) while <>
+    @ARGV = @_; (/$r/ ? $v || print : $v && print) while <>;
 }
 
 sub tr_ {
-- 
cgit v1.2.1