Bug in pg - doesn't close directories

[David E. A. Wilson]

Description:
	When pg encounters a directory in its argument list it prints
out a message to that effect and moves on to the next argument.
Unfortunately it does not close the directory and eventually runs
out of file descriptors.

Repeat-by:
	Give pg more directories than the system allows open fd's.
(64 should be enough on any system). The first N will have the message:

	pg: filename is a directory

while the remainder will have:

	filename: Too many open files

Systems affected:
	Probably all using AT&T source. I have found the bug in
A/UX 1.1b (Mac II), Dynix 2.0v2 (Sequent Symmetry),
SunOS 4.0.3b (Sparcstation 1) and OSx4.4c (Pyramid 90xe).