mk-list

   1 #!/usr/bin/env zsh
   2
   3 setopt ERR_EXIT EXTENDED_GLOB
   4 for d (**/*(/)) {
   5     list=()
   6     for f ($d/*.info(onN)) list=($list $f:t:r)
   7     [[ ${#list} != 0 ]] || continue
   8     print ${(F)list} > $d/list
   9     touch -r $d/${list[-1]}.info $d/list
  10 }