From dd487d4184d79b3e063be14f1ae36c88ddf89ae6 Mon Sep 17 00:00:00 2001
From: Wilson Snyder <wsnyder@wsnyder.org>
Date: Fri, 19 Sep 2008 08:00:02 -0400
Subject: [PATCH] Fix t_psl_basic_cover test for new SystemPerl package

---
 test_regress/t/t_psl_basic_cover.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/test_regress/t/t_psl_basic_cover.pl b/test_regress/t/t_psl_basic_cover.pl
index b82f967bb..46c99a794 100755
--- a/test_regress/t/t_psl_basic_cover.pl
+++ b/test_regress/t/t_psl_basic_cover.pl
@@ -16,7 +16,7 @@ execute (
 	 check_finished=>1,
 	 );
 
-file_grep ($Last_Self->{coverage_filename}, qr/t=>'psl_cover',o=>'cover',c=>2\);/);
+file_grep ($Last_Self->{coverage_filename}, qr/,o=>'cover'.*,c=>2\);/);
 file_grep ($Last_Self->{coverage_filename}, qr/DefaultClock.*,c=>1\);/);
 file_grep ($Last_Self->{coverage_filename}, qr/ToggleLogIf.*,c=>9\);/);