#
cd /usr/lib
#####Message Texts######
set mesg1 = "Enter aliases, in the form: alias:real name(s)."
set mesg2 = "Be sure to start aliases at left margin, and"
set mesg3 = "separate multiple real names by a comma."
########################
echo $mesg1
while (1 != 0)
	set node = ($<)
 	if ($#node == 0) then
	 	break
 	endif
	echo $node >> aliases 
end
/usr/ucb/newaliases
