#! /bin/csh
# shell for running texspell which is TeX and LaTeX's spell
# Author: Kamal Al-Yahya 1984
set flag = ()
unset file
if ($#argv == 0) then
echo "usage: texspell [-w -i] file"
exit(-1)
endif
while ($#argv > 0)
switch ($argv[1])
case -*:
set flag = ($flag $argv[1])
breaksw
default:
set file
breaksw
endsw
if !($?file) then
shift argv
else
break
endif
end
if ($#argv == 0) then
echo "usage: texspell [-w -i] file"
exit(-1)
endif
while ($#argv > 0)
if -e $argv[1] then
detex $flag $argv[1] | spell
else
echo "Can't open $argv[1]"
exit(-1)
endif
shift argv
end
exit(0)
