|
|
1.1 ! root 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.1.2 85/05/20 15:55:37 lwall Exp $ ! 8: # ! 9: # $Log: mbox.saver.SH,v $ ! 10: # Revision 4.3.1.2 85/05/20 15:55:37 lwall ! 11: # Turned $5 into \$5. ! 12: # ! 13: # Revision 4.3.1.1 85/05/10 11:35:30 lwall ! 14: # Branch for patches. ! 15: # ! 16: # Revision 4.3 85/05/01 11:42:51 lwall ! 17: # Baseline for release with 4.3bsd. ! 18: # ! 19: # ! 20: # Arguments: ! 21: # 1 Full name of article (%A) ! 22: # 2 Public news spool directory (%P) ! 23: # 3 Directory of current newsgroup (%c) ! 24: # 4 Article number (%a) ! 25: # 5 Where in article to start (%B) ! 26: # 6 Newsgroup name (%C) ! 27: # 7 Save destination (%b) ! 28: # 8 First line of message, normally From... ! 29: # ! 30: export PATH || (echo "OOPS, this isn't sh. Desperation time. I will feed myself to sh."; sh \$0; kill \$\$) ! 31: ! 32: ( $echo "\$8" ! 33: case "\$5" in ! 34: 0) $echo "Article \$4 of \$6:" ;; ! 35: esac ! 36: $tail +\$5c \$1 | $sed "s/^From/>From/" ! 37: $echo "" ! 38: $echo "" ) >> \$7 ! 39: !GROK!THIS! ! 40: $eunicefix mbox.saver ! 41: chmod 755 mbox.saver
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.