home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / unix / volume23 / trn / part13 / mbox.saver.SH < prev    next >
Text File  |  1991-08-22  |  2KB  |  72 lines
  1. case $CONFIG in
  2.     '') . ./config.sh ;;
  3. esac
  4. echo "Extracting mbox.saver (with variable substitutions)"
  5. $spitshell >mbox.saver <<!GROK!THIS!
  6. $startsh
  7. # $Header: mbox.saver.SH,v 4.3.3.1 90/08/20 16:30:28 davison Trn $
  8. # 
  9. # $Log:    mbox.saver.SH,v $
  10. # Revision 4.3.3.1  90/08/20  16:30:28  davison
  11. # Added support for MMDF format mailboxes.
  12. # 
  13. # Revision 4.3.2.3  90/11/22  14:28:27  sob
  14. # Changed . config.sh to . ./config.sh
  15. # 
  16. # Revision 4.3.2.2  90/03/17  20:44:54  sob
  17. # Modify Article header to place the colon after Article.
  18. # 
  19. # Revision 4.3.2.1  89/11/28  00:05:47  sob
  20. # Branch for RN/RRN combo patches
  21. # 
  22. # Revision 4.3.1.2  85/05/20  15:55:37  lwall
  23. # Turned $5 into \$5.
  24. # 
  25. # Revision 4.3.1.1  85/05/10  11:35:30  lwall
  26. # Branch for patches.
  27. # 
  28. # Revision 4.3  85/05/01  11:42:51  lwall
  29. # Baseline for release with 4.3bsd.
  30. # 
  31. # 
  32. #    Arguments:
  33. #    1 Full name of article (%A)
  34. #    2 Public news spool directory (%P)
  35. #    3 Directory of current newsgroup (%c)
  36. #    4 Article number (%a)
  37. #    5 Where in article to start (%B)
  38. #    6 Newsgroup name (%C)
  39. #    7 Save destination (%b)
  40. #    8 First line of message, normally From...
  41. #
  42. export PATH || (echo "OOPS, this isn't sh.  Desperation time.  I will feed myself to sh."; sh \$0; kill \$\$)
  43.  
  44. !GROK!THIS!
  45. case $mboxchar in
  46. "$CTRLA")
  47.     $spitshell >>mbox.saver <<!GROK!THIS!
  48. ( $echo "$CTRLA$CTRLA$CTRLA$CTRLA"
  49.   if $test "\$5" = 0 -a ! "\$4" = 0 ; then
  50.     $echo "Article: \$4 of \$6"
  51.   fi
  52.   $tail +\$5c \$1
  53.   $echo ""
  54.   $echo ""
  55.   $echo "$CTRLA$CTRLA$CTRLA$CTRLA" ) >> \$7
  56. !GROK!THIS!
  57.     ;;
  58. *)
  59.     $spitshell >>mbox.saver <<!GROK!THIS!
  60. ( $echo "\$8"
  61.   if $test "\$5" = 0 -a ! "\$4" = 0 ; then
  62.     $echo "Article: \$4 of \$6"
  63.   fi
  64.   $tail +\$5c \$1 | $sed "s/^From />From /"
  65.   $echo ""
  66.   $echo "" ) >> \$7
  67. !GROK!THIS!
  68.     ;;
  69. esac
  70. $eunicefix mbox.saver
  71. chmod 755 mbox.saver
  72.