ref: 5a4afb116aebf9d351283566a84f0e54e358cc65
dir: /bin/mkradio/
#!/bin/rc
rfork n
rimport -C -c -u share aib /usr/share /n/share || exit rimport
if(! ~ $#* 0)
t=$1
if not
t=`{walk -demn /n/share/radio}
cd $home/m
for(i in `{walk -emn | awk '{if($1 > '^$t(1)^') print $2}'}){
echo $i
lofi <$i >/n/share/radio/$i
}