home *** CD-ROM | disk | FTP | other *** search
/ Enter 1998 December / ENTER12_1.iso / os2 / Awe / AWE0157.ZIP / plg / insertcopyright.plg < prev    next >
Encoding:
Text File  |  1998-08-15  |  670 b   |  17 lines
  1. Copyright James Mulgrue
  2. http://www.yoursite.co.uk/os/2/awe/
  3. Insert Copyright at Cursor
  4. N
  5.  
  6.  
  7. plgfilebeingworkedon = loadfile
  8. if plgfilebeingworkedon = "LOADFILE" then plgfilebeingworkedon = "Unsaved"
  9.  
  10. plgnl = '0d0a'x
  11. PLGCopyright.1 = "<!-- Copyright 1998 PowerDale IT Limited -->"||plgnl"<!-- Written with AWE for OS/2 -->"||plgnl
  12. PLGCopyright.2 = "<!-- Development Location "||plgfilebeingworkedon||" -->"||plgnl
  13. PLGCopyright.3 = "<!-- Written "||time() date()||" -->"||plgnl
  14.  
  15. PLGDocumentSource = LEFT(PLGDocumentSource,PLGSelectedBegin)||PLGCopyright.1||PLGCopyright.2||PLGCopyright.3||Right(PLGDocumentSource,length(PLGDocumentSource)-PLGSelectedEnd)
  16.  
  17.