|
|
DataMuseum.dkPresents historical artifacts from the history of: RC9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - downloadIndex: @ T
Length: 742 (0x2e6)
Types: TextFile
Notes: @(#)Text.spell 13.1 (RC International) 91/07/25
Names: »Text.spell«
└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
└─⟦97ad7467e⟧ »0005«
└─⟦this⟧ »./home/vmsys/OBJECTS/Text.spell«
# @(#)Text.spell 13.1 (RC International) 91/07/25
#ident "@(#)face:OBJECTS/Text.spell 1.1"
title="Results of Spell on ${TT}"
framemsg=const "Press the CANCEL function key to cancel."
lifetime=longterm
begrow=any
begcol=any
close=`unset -l HMSG -l LL -l TT; rm -f /tmp/f.sp.${VPID}`
`pathconv -t -v "${ARG1}"|set -l TT;
/usr/bin/spell "$ARG1" > /tmp/f.sp.${VPID};
if [ -s /tmp/f.sp.${VPID} ];
then
set -l HMSG="
What follows is the output of spell:
";
echo "rows=18";
else
set -l HMSG="
Spell detected no errors in ${TT}.
";
echo "rows=4";
fi`
header="${HMSG}"
text="`readfile /tmp/f.sp.${VPID}`"
columns=`longline | set -l LL;
if [ "${LL}" -gt "72" ];
then
echo 72;
elif [ "${LL}" -lt "48" ];
then
echo 48;
else
echo ${LL};
fi`