#!/usr/bin/env sh6
:
: sh6 - " Force sh(1), csh(1), and other shells to exit w/ error! " <'' ;;;
:
: "  @(#)$Id: f8dde582e62c14eebdc59b5cd77f62317d79a726 $  "
:
: "  The author of this file, J.A. Neitzel <jan (at) v6shell (dot) org>,  "
: "  hereby grants it to the public domain.                               "
:

:
: "  Print error message for command and exit w/ a non-zero status.  "
:
: "  usage: perror command message  "
:

:
: " Check for correct usage. "
:
: >>$0'' <'' ; : >>$1'' <'' ; : >>$2'' <'' ; : >>$3'' <''
killer $0 perror
if X$1 = X -o X$2 = X -o X$3 != X if { exit } pusage $0 '"command message"'

( basename $1 | tr -d '\n' ; echo : $2 ) | fd2 -e cat
false