[perl #40458] [PATCH] fix for c_code_coda.t multiple occurrences test

[Paul Cochrane]

# New Ticket Created by  "Paul Cochrane" 
# Please include the string:  [perl #40458]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=40458 >


Hi,

This patch gets the C-file coda test to pick up multiple occurrences
of the coda correctly.

Regards,

Paul

files affected:
t/codingstd/c_code_coda.t

Index: t/codingstd/c_code_coda.t
===================================================================
--- t/codingstd/c_code_coda.t	(revision 14845)
+++ t/codingstd/c_code_coda.t	(working copy)
@@ -74,8 +74,8 @@
         unless $buf =~ m{\Q$coda\E\n*\z};
 
     # append to the extra_coda array if coda-like text appears more than once
-    my $vim_many   = () = $buf =~ m{^ \s* \*? \s* vim: \s* $}gmx;
-    my $emacs_many = () = $buf =~ m{^ \s* \*? \s* Local variables: \s* $}gmx;
+    my $vim_many   = () = $buf =~ m{^ \s* \*? \s* vim: \s* }gmx;
+    my $emacs_many = () = $buf =~ m{^ \s* \*? \s* Local variables: \s* }gmx;
     push @extra_coda => "$path\n"
         if $vim_many > 1 || $emacs_many > 1;
 }