From 4e990ed92226f64ec268fe6b627ec3c72ea212bb Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 25 Nov 2005 15:58:26 +0000
Subject: enhance to have no remaining spaces

---
 perl_checker.src/test/test_it | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl_checker.src/test/test_it')

diff --git a/perl_checker.src/test/test_it b/perl_checker.src/test/test_it
index 2f7c599..e88607e 100755
--- a/perl_checker.src/test/test_it
+++ b/perl_checker.src/test/test_it
@@ -62,8 +62,8 @@ foreach my $test (@tests) {
 
     pop @l while $l[-1] =~ /^\s*$/;
     if (@l == 1) {
-        if ($l[-1] !~ /(;|[\s{]\})\s+$/) {
-            $l[-1] =~ s/^(.*?)(\s+$)/xxx($1);$2/;
+        if ($l[-1] !~ /(;|[\s{]\})\s*$/) {
+            $l[-1] =~ s/^(.*?)(\s*$)/xxx($1);$2/;
         } else {
             # no comma for: 
             # - prefix for/foreach/...
-- 
cgit v1.2.1