# New Ticket Created by Mike Mattie # Please include the string: [perl #42899] # in the subject line of all future correspondence about this issue. # <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=42899 >
Hello, My version of Emacs appears to be leaking tabs into files despite having this in my emacs config: (setq indent-tabs-mode nil) To help track down the problem in emacs/cperl and get it fixed I need better diagnostics. I have attached a patch that adds the line numbers to each instance of a tab being detected in the whitespace of a file. Also all the violating lines, not just the first are listed. This should be a win all around. Cheers, Mike Mattie - [EMAIL PROTECTED]
--- HEAD/t/codingstd/tabs.t 2007-03-18 05:17:23.000000000 -0700 +++ BASE/t/codingstd/tabs.t 2007-05-07 04:29:23.000000000 -0700 @@ -43,12 +43,15 @@ open my $fh, '<', $path or die "Cannot open '$path' for reading: $!\n"; + my $line = 1; + # search each line for leading tabs while (<$fh>) { if ( $_ =~ m/^ *\t/ ) { - push @tabs => "$path\n"; - last; + push @tabs => "$path:$line\n"; } + + $line++; } close $fh; } @@ -56,7 +59,7 @@ ## L<PDD07/Code Formatting/"Indentation must consist only of spaces"> ok( !scalar(@tabs), "tabs in leading whitespace" ) or diag( - "Found tab in leading whitespace in " . scalar(@tabs) . " files. Files affected:[EMAIL PROTECTED]" ); + "Found tab in leading whitespace " . scalar(@tabs) . "instances. Lines found:[EMAIL PROTECTED]" ); # Local Variables: # mode: cperl
signature.asc
Description: PGP signature