home *** CD-ROM | disk | FTP | other *** search
/ back2roots/padua / padua.7z / padua / uucp / wUUCP_0.0.23.lha / featurerequest < prev    next >
Encoding:
AmigaDOS Script File  |  1993-08-07  |  2.0 KB  |  51 lines
  1. .key package/A,programm/A,to/A,post/S
  2. .bra {
  3. .ket }
  4.  
  5. ; get some information about system and it's configuration
  6.  
  7. findconfig USERNAME              >env:featurerequestUSERNAME
  8. findconfig REALNAME              >env:featurerequestREALNAME
  9. findconfig NODENAME DOMAINNAME   >env:featurerequestHOSTNAME
  10. findconfig MAILEDITOR            >env:featurerequestEDITOR
  11. messageid                        >env:featurerequestID
  12. ctime rfc                        >env:featurerequestCTIME
  13.  
  14. if {post} not eq "post"
  15.    echo  >t:report.form "Path: featurerequest"
  16.    echo >>t:report.form "Newsgroups: {to}"
  17. else
  18.    echo  >t:report.form "To: {to}"
  19. endif
  20.  
  21. echo >>t:report.form "From: $featurerequestUSERNAME@$featurerequestHOSTNAME ($featurerequestREALNAME)"
  22. echo >>t:report.form "Sender: FeatureRequest@$featurerequestHOSTNAME (Script)"
  23. echo >>t:report.form "Date: $featurerequestCTIME"
  24. echo >>t:report.form "Message-ID: <$featurerequestID@$featurerequestHOSTNAME>"
  25. echo >>t:report.form "Subject: Request for {programm} ($featurerequestCTIME)"
  26. echo >>t:report.form "X-Report-For: {package}/{programm}*N"
  27.  
  28. echo >>t:report.form "     [Leave the *"%string:*" and *"%%*" on lines of their own.  Before sending,"
  29. echo >>t:report.form "delete all comment lines (enclosed in *"[]*"). Thank you.]*N"
  30.  
  31. echo >>t:report.form "[Place your text between *"%text:*" and *"%%*"]*N%text:*N*N%%*N"
  32. echo >>t:report.form "[Please give a short summary (<=75 chars)]*N%comment:*N*N%%*N"
  33. echo >>t:report.form "[Just leave the following alone]*N%id:*N$featurerequestID-$featurerequestUSERNAME@$featurerequestHOSTNAME*N%%*N"
  34. echo >>t:report.form "%cpu:*N`cpu`*N%%*N"
  35. echo >>t:report.form "%ver:*N`version`*N%%*N"
  36. echo >>t:report.form "%avail:"
  37. avail >>t:report.form
  38. echo >>t:report.form "%%*N"
  39. failat 1
  40. if "$EDITOR" eq "*$EDITOR"
  41.    $featurerequestEDITOR t:report.form
  42. else
  43.    $EDITOR t:report.form
  44. endif
  45. if {post} not eq "post"
  46.    relaynews -r -s <t:report.form
  47. else
  48.    sendmail <t:report.form
  49. endif
  50. delete t:report.#? env:featurerequest#? quiet
  51.