home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Amiga 13 / MA_Cover_13.bin / source / c / stefanb_src / old_projects / umsuucp / convert / convauucpnews < prev    next >
Encoding:
AmigaDOS Script File  |  1993-10-28  |  1.1 KB  |  46 lines
  1. .key Node/A
  2. .bra {
  3. .ket }
  4. ;
  5. ; Import AmigaUUCPs UUNEWS: data base to UMS
  6. ;
  7. ; Be sure to set uucp.keepdupes to "N", because this script does
  8. ; not look out for hard-linked crosspostings in the news database!
  9. ;
  10. Echo Importing your old UUNEWS: news database into UMS as user 'uucp.{Node}'.
  11. Resident /bin/uuxqt
  12. Resident C:Copy
  13. Resident C:Join
  14.  
  15. ;
  16. ; Create the UUCP command file
  17. ;
  18. ; {Node} should be the name of your primary host
  19. ;
  20. Echo >T:cmd{$$} U news {Node}
  21. Echo >>T:cmd{$$} F D
  22. Echo >>T:cmd{$$} C rnews
  23.  
  24. ;
  25. ; Each article is converted to a RNEWS file
  26. ; and then imported with UMS UUCPs uuxqt
  27. ;
  28. ; Be sure that T: points to a directory
  29. ; with enough space for the script file!
  30. ;
  31. Echo Scanning UUNEWS: for news articles...
  32. List UUNEWS: Files All Pat #[0-9] LFormat "Echo *>T:temp{$$} #! rnews %l*NJoin T:temp{$$} %f%n to UUSPOOL:D*NCopy T:cmd{$$} UUSPOOL:X.1*Nuuxqt" To T:script{$$}
  33.  
  34. ;
  35. ; Do the hard work now...
  36. ;
  37. Echo Importing news articles into UMS...
  38. Execute T:script{$$}
  39.  
  40. ; Cleanup
  41. Delete T:script{$$} T:temp{$$} T:cmd{$$} Quiet
  42. Resident uuxqt Remove
  43. Resident Copy Remove
  44. Resident Join Remove
  45. Echo Finished.
  46.