Check spelling of Perl man pages too.

This commit is contained in:
Dianne Skoll
2025-10-20 13:55:33 -04:00
parent f8ac99d22e
commit 6b163092c7
3 changed files with 20 additions and 4 deletions

View File

@@ -13,6 +13,7 @@
13ths
15am
1GB
1p
1pm
20am
20pm
@@ -22,6 +23,7 @@
2s
30PM
34am
3pm
3string34
45am
45pm
@@ -510,6 +512,7 @@ datetime
datetimes
day1
day2
daymap
dayname
daynames
daynum
@@ -591,6 +594,7 @@ gridline
gridlines
groff
gvim
hashref
hasn
hdate
hebdate
@@ -736,6 +740,7 @@ num
ok
oktober
ol
oldstyle
ons
ordx
orthodoxeaster
@@ -785,6 +790,7 @@ rem2ps
rem2ps2
remind's
rescan
rgb
rn
ro
romanian
@@ -911,6 +917,7 @@ ubitux
ui
uid
unbuffered
undef
undefine
underlinefg
uniq
@@ -941,6 +948,8 @@ wkstart
wn
www
x00
x1
x2
xAB
xdg
xinitrc
@@ -948,6 +957,8 @@ xless
xmessage
xsiz
xsiz1
y1
y2
year1
year2
yeardiff

View File

@@ -662,6 +662,12 @@ for i in ../man/*.1 ; do
fi
done
if test -d ../rem2pdf/blib ; then
PERLMANS=`find ../rem2pdf/blib -name '*.1p' -o -name '*.3pm'`
else
PERLMANS=""
fi
# If we have "spellintian", run it against man pages
cat <<'EOF' >> $OUT
@@ -673,7 +679,7 @@ spellintian /dev/null < /dev/null > /dev/null 2>&1
if test $? = 0 ; then
echo "Linting man pages"
# we grep out some false-positives from rem2ps
spellintian --picky ../man/*.1 2>&1 | grep -v -F 'MinX MinX (duplicate word)' | grep -v -F 'MinY MinY (duplicate word)' | grep -v -F 'show show (duplicate word)' >> $OUT 2>&1
spellintian --picky $PERLMANS ../man/*.1 2>&1 | grep -v -F 'MinX MinX (duplicate word)' | grep -v -F 'MinY MinY (duplicate word)' | grep -v -F 'show show (duplicate word)' >> $OUT 2>&1
fi
# If we have "hunspell", run it against man pages
@@ -688,14 +694,13 @@ HUNSPELL="hunspell -d en_US -l -p manpage-personal-dict"
$HUNSPELL /dev/null < /dev/null > /dev/null 2>&1
if test $? = 0; then
echo "Spell-checking man pages, WHATSNEW and README.md"
cat ../man/*.1 | $HUNSPELL -n >> $OUT 2>&1
cat ../man/*.1 $PERLMANS | $HUNSPELL -n >> $OUT 2>&1
cat ../docs/WHATSNEW | $HUNSPELL >> $OUT 2>&1
cat ../README.md | $HUNSPELL >> $OUT 2>&1
# If we have pod2man, check rem2pdf and rem2html man pages too
pod2man < ../rem2html/rem2html.in > /dev/null 2>&1
if test $? = 0 ; then
pod2man < ../rem2html/rem2html.in | $HUNSPELL -n >> $OUT 2>&1
pod2man < ../rem2pdf/bin/rem2pdf.in | $HUNSPELL -n >> $OUT 2>&1
fi
fi