# 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
