chiark
/
gitweb
/
~ianmdlvl
/
dgit.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
test suite: manpages-format: Test -Tps too
[dgit.git]
/
tests
/
tests
/
manpages-format
diff --git
a/tests/tests/manpages-format
b/tests/tests/manpages-format
index 79eda7529dbc519df7d77f7c1d031b84b1497576..3f3362b6ea8e3dd429593b3ca0596a02f0a482d8 100755
(executable)
--- a/
tests/tests/manpages-format
+++ b/
tests/tests/manpages-format
@@
-19,11
+19,11
@@
run_man () {
make $roff >&2
cmd='man "$@" -l $roff'
fi
make $roff >&2
cmd='man "$@" -l $roff'
fi
- eval "$cmd 2>&1 >/dev/null |tee $errs
>&2
"
+ eval "$cmd 2>&1 >/dev/null |tee $errs"
}
for roff in $manpages; do
}
for roff in $manpages; do
- for fmt in txt; do
+ for fmt in txt
ps
; do
>$tmp/$roff.$fmt-expected
done
done
>$tmp/$roff.$fmt-expected
done
done
@@
-37,12
+37,14
@@
not_egrep_vxPf () {
perl -ne '
BEGIN () {
open PATS, shift @ARGV or die $!;
perl -ne '
BEGIN () {
open PATS, shift @ARGV or die $!;
- $re = join "|", map { chomp; qr{^(?:$_)$} } <PATS>;
+ $re = join "|", map { chomp; qr{^(?:$_)$} }
+ qr{^(?=a)b}, <PATS>;
+ print STDERR "RE $re\n";
}
next if m{$re};
print STDERR "unexpected: $_";
$bad = 1;
}
next if m{$re};
print STDERR "unexpected: $_";
$bad = 1;
- END { die "unexpected
, re= $re
\n" if $bad; }
+ END { die "unexpected
errors
\n" if $bad; }
' "$@"
}
' "$@"
}
@@
-65,7
+67,11
@@
for roff in $manpages; do
page=${roff%.*}
prep txt
page=${roff%.*}
prep txt
- run_man >/dev/null
+ run_man
+ check
+
+ prep ps
+ run_man -Tps
check
done
check
done