home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 3 / 3554 < prev    next >
Internet Message Format  |  1991-06-26  |  1KB
  1. From: vandys@sequent.com (Andrew Valencia)
  2. Newsgroups: alt.sources
  3. Subject: MH folder repack
  4. Message-ID: <1991Jun27.001016.6053@sequent.com>
  5. Date: 27 Jun 91 00:10:16 GMT
  6.  
  7. I use MH through its shell command interface, and I've always missed
  8. a function to shuffle everything down so that the message numbers
  9. start from 1 and count up by 1.  I finally wrote a shell script to
  10. help myself, and here it is!  Standard disclaimer, use at your own
  11. risk.
  12.  
  13.                     Andy Valencia
  14.                     vandys@sequent.com
  15.  
  16. #!/bin/sh
  17. #
  18. # Utility to repack an MH folder.  Assumes your folders are in ~/Mail.
  19. #
  20. if [ ! -d $HOME/Mail ]
  21. then
  22.     echo "I don't know how to find your mh folder directory"
  23.     exit 1
  24. fi
  25. for x
  26. do
  27.     folder=`expr $x : '+\(.*\)' \| $x`
  28.     echo "Repacking $folder...\c"
  29.     cd $HOME/Mail
  30.     if [ ! -d $folder ]
  31.     then
  32.         echo " no such folder"
  33.         exit 1
  34.     fi
  35.     cd $folder
  36.     files=`/bin/ls [0-9]* | sed '/^[0-9]*$/!d' | sort -n`
  37.     echo ""
  38.     cnt=1
  39.     for y in $files
  40.     do
  41.         echo "  $y -> $cnt"
  42.         if [ $y -ne $cnt ]
  43.         then
  44.             mv $y $cnt
  45.         fi
  46.         cnt=`expr $cnt + 1`
  47.     done
  48. done
  49. exit 0
  50.