Cosmetic in usage string. Mdocify author section.

This commit is contained in:
charnier 1997-08-26 11:13:39 +00:00
parent 287f219c02
commit 80e0f83375
2 changed files with 6 additions and 5 deletions

View File

@ -27,7 +27,7 @@
.\" (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
.\" OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
.\"
.\" $Id$
.\" $Id: which.1,v 1.8 1997/02/22 19:57:50 peter Exp $
.Dd January 26, 1995
.Dt WHICH 1
.Os FreeBSD
@ -61,5 +61,6 @@ command first appeared in
.Xr perl 1
.Sh AUTHOR
The PERL script for this more modern version of
.Nm which
was written by Wolfram Schneider <wosch@FreeBSD.org>.
.Nm
was written by
.An Wolfram Schneider Aq wosch@FreeBSD.org .

View File

@ -24,7 +24,7 @@
# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
# SUCH DAMAGE.
#
# $Id$
# $Id: which.pl,v 1.10 1997/02/22 19:57:51 peter Exp $
$all = $silent = $found = 0;
@path = split(/:/, $ENV{'PATH'});
@ -34,7 +34,7 @@ if ($ARGV[0] eq "-a") {
} elsif ($ARGV[0] eq "-s") {
$silent = 1; shift @ARGV;
} elsif ($ARGV[0] =~ /^-(h|help|\?)$/) {
die "usage:\n\twhich [-a] [-s] program ...\n";
die "usage: which [-a] [-s] program ...\n";
}
foreach $prog (@ARGV) {