# script to interactively add entries to /usr/lib/uucp/L-devices
cd /usr/lib/uucp
#####Message texts######
set mesga = "Updating L-devices"
set mesg1 = "Make entries in the form:"
set mesg2 = "'Caller'<SP>'Line'<SP>'Useful'<SP>'Baud'<SP>'Dialer'"
set mesg3 = "A sample entry would be:"
set mesg4 = "ACU tty47 unused 1200 hayes"
########################
echo $mesga
echo ' '
echo $mesg1
echo '			'$mesg2
echo $mesg3
echo '			'$mesg4
while (1 != 0)
	set line = ($<)
 	if ($#line == 0) then
	 	break
 	endif
	echo $line >> L-devices
end
