shithub: riscv

ref: 3bf89ed825835b574c3d1c7f640918e65aac488d
dir: /sys/lib/dist/mail/lib/setup.bayes/

View raw version 
#!/bin/rc

cd /mail/box/$user
>>_bounced
>>L.spam
chmod +arw _bounced
>>_prof.mbox
>>_prof.spam
if(! test -s _prof.mbox)
	cp /mail/lib/prof.mbox _prof.mbox
if(! test -s _prof.spam)
	cp /mail/lib/prof.spam _prof.spam
chmod +lrw _prof.mbox _prof.spam
chmod +lrw L.spam
>>spam
chmod +alrw spam
i=0
if(test -f pipeto){
	while(test -f pipeto.$i)
		i=`{echo 1+$i |hoc}
	mv pipeto pipeto.$i
	echo saved pipeto as pipeto.$i
}
cp /mail/lib/pipeto.bayes pipeto
chmod 775 pipeto