# HG changeset patch
# User Maxim Dounin <mdounin@mdounin.ru>
# Date 1254392888 -14400
# Node ID 9ddc182148541171368919df8370e13ee86e06a9
# Parent  f92852da34aa50d8afe61d176fb9498d65fec922
Tests: arbitrary regexp support in has().

diff --git a/lib/Test/Nginx.pm b/lib/Test/Nginx.pm
--- a/lib/Test/Nginx.pm
+++ b/lib/Test/Nginx.pm
@@ -60,8 +60,11 @@ sub has {
 		rewrite	=> '(?s)^(?!.*--without-http_rewrite_module)',
 	);
 
+	my $re = $regex{$feature};
+	$re = $feature if !defined $re;
+
 	Test::More::plan(skip_all => "$feature not compiled in")
-		unless `$NGINX -V 2>&1` =~ $regex{$feature};
+		unless `$NGINX -V 2>&1` =~ $re;
 
 	return $self;
 }