projects / unix-history / blame
| Commit | Line | Data |
|---|---|---|
| 9c4b96b4 C |
1 | case $CONFIG in |
| 2 | '') . config.sh ;; | |
| 3 | esac | |
| 4 | echo "Extracting norm.saver (with variable substitutions)" | |
| 5 | $spitshell >norm.saver <<!GROK!THIS! | |
| 6 | $startsh | |
| 7 | # $Header: norm.saver.SH,v 4.3.1.2 85/05/20 15:56:24 lwall Exp $ | |
| 8 | # | |
| 9 | # $Log: norm.saver.SH,v $ | |
| 10 | # Revision 4.3.1.2 85/05/20 15:56:24 lwall | |
| 11 | # Turned $5 into \$5. | |
| 12 | # | |
| 13 | # Revision 4.3.1.1 85/05/10 11:36:52 lwall | |
| 14 | # Branch for patches. | |
| 15 | # | |
| 16 | # Revision 4.3 85/05/01 11:45:16 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 | # | |
| 29 | export PATH || (echo "OOPS, this isn't sh. Desperation time. I will feed myself to sh."; sh \$0; kill \$\$) | |
| 30 | ||
| 31 | ( case "\$5" in | |
| 32 | 0) $echo "Article \$4 of \$6:" ;; | |
| 33 | esac | |
| 34 | $tail +\$5c \$1 | |
| 35 | $echo "" | |
| 36 | $echo "" ) >> \$7 | |
| 37 | !GROK!THIS! | |
| 38 | $eunicefix norm.saver | |
| 39 | chmod 755 norm.saver |