|
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: @ F T
Length: 883 (0x373)
Types: TextFile
Notes: @(#)Form.umountfs 13.2 (RC International) 91/07/25
Names: »Form.umountfs«
└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
└─⟦bbf173f5c⟧ »0004«
└─⟦this⟧ »./usr/sadm/sysadm/menu/files/unmount/Form.umountfs«
# @(#)Form.umountfs 13.2 (RC International) 91/07/25
#ident "@(#)oamintf:files/unmount/Form.umountfs 1.5"
Form="Unmount a File System"
close=`unset -l FS;
/bin/rm /tmp/unmnt 2>/dev/null`CLOSE
help=OPEN TEXT $INTFBASE/Text.itemhelp $LININFO
`readfile $INTFBASE/form.msg | message -p`
`set -l ERRTLE="Unmount-Error";
set -l OKTLE="Unmount";
set -l UNMOUNTED=1;
echo "\"$FS\" has been unmounted successfully." >/tmp/umntok`
done=`regex -e -v "$F1"
'y' '`message Unmounting File System``/sbin/umount "$FS" 2>/tmp/umnt;
regex -e -v $RET
\'^0$\' \'OPEN TEXT $OBJ_DIR/Text.unmount "$OKTLE" "/tmp/umntok"\'
\'^.*$\' \'OPEN TEXT $OBJ_DIR/Text.unmount "$ERRTLE" "/tmp/umnt"\'`'
'n' 'CLOSE'`
name="unmount $FS ?"
lininfo=Form.umountfs:F1
nrow=1
ncol=1
frow=1
fcol=30
rows=1
columns=3
value=yes
rmenu={ yes no }
menuonly=true
invalidmsg="Press CHOICES to select valid response."