harvey/usr/glenda/bin/rc/pull

#!/bin/rc

rfork e
flags=()
while(! ~ $#* 0 && ~ $1 -*){
	flags=($flags $1)
	shift
}
if(test -f /srv/kfs.cmd)
	disk/kfscmd allow
replica/pull -v $flags /dist/replica/network $*
if(test -f /srv/kfs.cmd)
	disk/kfscmd disallow