#!/bin/csh -f
#$Id: mkdesc,v 1.5 2004/06/23 13:51:59 mpound Exp $

if ( $#argv == 0 ) goto Usage

foreach file ($*)
 
 if ( -e $file.desc ) then
   echo $file.desc already exists:
   cat $file.desc
 else
   echo Doing $file...
   xv -expand 0.3 $file &
   echo Enter a short one line summary, followed by verbose description.
   echo Close with ^D
   echo Here is $file :::
   cat > $file.desc
 endif
end

exit 0

Usage:
echo "Usage: $0 <filenames>  "
echo "(filenames typically wildcarded)"
exit 1