#! /usr/pkg//bin/tcsh -f

# starting from current directory, and recursively allows public
# read access to the entire subtree (files are readable, and 
# directories executable)

# note:  may run out of processes, in which case will have to try
# at lower levels

chmod go+xr .
foreach i (*)
   chmod go+r $i
   if (-x $i) then
      chmod go+x $i
   endif
   if (-d $i) then
      chmod go+x $i
      cd $i
      /usr/home/matloff/Machines/MakePublic
      cd ..
   endif
end