1 1.1 mrg set x $* 2 1.1 mrg . ./.param 3 1.1 mrg 4 1.1 mrg for dir in $DIRLST 5 1.1 mrg do 6 1.1 mrg cd $MANDIR/man$dir 7 1.1 mrg for file in $FILLST 8 1.1 mrg do 9 1.1 mrg so=`line < $file | sed "s/ .*//"` 10 1.1 mrg if test "$so" = ".so" 11 1.1 mrg then 12 1.1 mrg continue 13 1.1 mrg else 14 1.1 mrg ed - $file > $TMPDIR/tmp.$$ <<! 15 1.1 mrg /^\.SH NAME/+s/ .-.*//p 16 1.1 mrg q 17 1.1 mrg ! 18 1.1 mrg name=`line < $TMPDIR/tmp.$$` 19 1.1 mrg echo $name | grep "," > /dev/null 20 1.1 mrg if test $? -eq 0 21 1.1 mrg then 22 1.1 mrg name=`echo $name | sed "s/,/ /g"` 23 1.1 mrg for ent in $name 24 1.1 mrg do 25 1.1 mrg if test $ent = `echo $file | sed "s/\..*//"` 26 1.1 mrg then 27 1.1 mrg continue 28 1.1 mrg fi 29 1.1 mrg suf=`echo $file | sed "s/.*\.\(.\{1,2\}\)\$/\1/"` 30 1.1 mrg if test ! -f $ent.$suf 31 1.1 mrg then 32 1.1 mrg cat > $ent.$suf <<! 33 1.1 mrg .so $MANDIR/man$dir/$file 34 1.1 mrg ! 35 1.1 mrg fi 36 1.1 mrg done 37 1.1 mrg fi 38 1.1 mrg fi 39 1.1 mrg done 40 1.1 mrg 41 1.1 mrg rm -f tmp.$$ 42 1.1 mrg done 43