Jim Meyering wrote:
> Here's perl-based gorp that's uncovered a few more.
> The tricky part was to get the line numbers while in perl's
> slurp-entire-file mode (-0777).
>
> git ls-files|xargs perl -0777 -n \
> -e 'while (/\b(a|then?|if|but|or|and|to)\s+\1\b/gms)' \
> -e '{$n=($` =~ tr/\n/\n/ +
Paul Eggert wrote:
> Thanks. I pushed another one too, which I caught with:
>
>word1=$1
>word2=$2
>shift
>shift
>
>export LC_ALL=C
>gawk '
> BEGIN { IGNORECASE = 1 }
> /^[[:space:]]*'"$word2"'([^[:alnum:]_]|$)/ {
>if (NR == nr1 + 1 && FILENAME == filename1
Thanks. I pushed another one too, which I caught with:
word1=$1
word2=$2
shift
shift
export LC_ALL=C
gawk '
BEGIN { IGNORECASE = 1 }
/^[[:space:]]*'"$word2"'([^[:alnum:]_]|$)/ {
if (NR == nr1 + 1 && FILENAME == filename1)
print FILENAME ":" NR ":" $0
Trivial fixes:
>From 52feca2cda2edd985d76117836e2a522178e9ab3 Mon Sep 17 00:00:00 2001
From: Jim Meyering
Date: Sat, 9 Apr 2011 23:05:22 +0200
Subject: [PATCH] maint: change "can not" to "cannot"
But do not change the occurrences in maintain.texi or in
build-aux/po/
