From 14a9a81ec729e7b3c78d775cc76882e7122fcf2d Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Tue, 25 Feb 2003 15:20:29 +0000
Subject: [PATCH] make search for priv case independent

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

diff --git a/perl/Script.pm b/perl/Script.pm
index 434109ce..3128dcde 100644
--- a/perl/Script.pm
+++ b/perl/Script.pm
@@ -56,7 +56,7 @@ sub run
 			} else {
 				dbg($_) for @out;
 			}
-			last if @out && $l =~ /^pri?v?/;
+			last if @out && $l =~ /^pri?v?/i;
 		}
 	}
 }
-- 
2.34.1