We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 6429047 commit 245d05fCopy full SHA for 245d05f
1 file changed
css2/bin/chkspaces
@@ -2,7 +2,7 @@
2
# Check for lack of space before a start tag and
3
# after and end tag.
4
# Ian Jacobs
5
-# $Id: chkspaces,v 1.9 2006-10-09 18:55:52 ihickson Exp $
+# $Id: chkspaces,v 1.10 2009-04-20 13:40:26 bbos Exp $
6
7
$PROGNAME = substr($0, rindex($0, "/") + 1);
8
@@ -22,7 +22,7 @@ sub readfile {
22
$pattern1 = "(<\\/[^>]+>\\w+)";
23
$pattern2 = "(\\w(?:<(\\w+)\\s*[^>]*>)+)";
24
# Check for duplicate words.
25
-$pattern3 = "(\\b(\\w+)(?:\\s+|\\s*(?:<[^>]+>)+\\s*|\\s*(?:<\\/[^>]+>)+\\s*)\\2\\b)";
+$pattern3 = "(\\b([a-z]\\w*)(?:\\s+|\\s*(?:<[^>]+>)+\\s*|\\s*(?:<\\/[^>]+>)+\\s*)\\2\\b)";
26
27
foreach $file (@ARGV) {
28
print STDOUT "Checking $file\n";
0 commit comments