Changeset 1608

Timestamp:

Aug 8, 2011, 1:29:58 AM (14 years ago)

Author:

John Small

Message:

Ticket 462: Additional NNTP-related fixes.

File:

• trunk/ReleaseTool.cmd (modified) (8 diffs)

trunk/ReleaseTool.cmd

@@ -1162 +1162 @@
    cfg.SMTP.0     = 0
    cfg.FTP.keys   = 'DESCRIPTION COMMAND HOST USERID PASSWORD DIRECTORY FILE'
-   cfg.NNTP.keys  = 'DESCRIPTION COMMAND HOST USERID PASSWORD TO FROM SIGNATURE NEWSGROUPS'
+   cfg.NNTP.keys  = 'DESCRIPTION COMMAND HOST USERID PASSWORD TO FROM SIGNATURE'
    cfg.SMTP.keys  = 'DESCRIPTION COMMAND HOST USERID PASSWORD PORT TO FROM SIGNATURE UTCOFFSET'
 
@@ -1866 +1866 @@
          when option = 'T' then
             do
-               b4_timestamp = SysGetFileDateTime(tempfile)
+               b4_timestamp = SysGetFileDateTime(body_file)
                say 'The current body of the newsgroup message will now be loaded into an editor.'
                say 'Make desired changes, if any, and save the file.'
@@ -1873 +1873 @@
                call SysGetKey
                say
-               call ExecCmd cmd.editor tempfile
-               if b4_timestamp \= SysGetFileDateTime(tempfile) then
+               call ExecCmd cmd.editor body_file
+               if b4_timestamp \= SysGetFileDateTime(body_file) then
                   _text = '<Modified>'
             end
@@ -1893 +1893 @@
             say
             say 'Host     :' cfg.NNTP.s.host
-            say 'To       :' cfg.NNTP.s.newsgroups
+            say 'To       :' cfg.NNTP.s.to
             say 'From     :' cfg.NNTP.s.from
             say 'UserID   :' cfg.NNTP.s.userid
@@ -1920 +1920 @@
                   do
                      say 'Enter a comma=separated list of newagroup(s) (followed by the ENTER key).'
-                     cfg.NNTP.s.newsgroups = linein()
+                     cfg.NNTP.s.to = linein()
                   end
                when option = 'F' then
@@ -1979 +1979 @@
                      _command = part1 || cfg.NNTP.s.from || part2
                   end
-                  do while pos('##NEWSGROUPS##', _command) > 0
-                     parse var _command part1 '##NEWSGROUPS##' part2
-                     _command = part1 || cfg.NNTP.s.newsgroups || part2
+                  do while pos('##TO##', _command) > 0
+                     parse var _command part1 '##TO##' part2
+                     _command = part1 || cfg.NNTP.s.to || part2
                   end
                   rcx = ExecCmd(_command)
@@ -2095 +2095 @@
                      end
                      rc = SockSend(socket, 'From:' cfg.NNTP.s.from || cfg.crlf || ,
-                                           'Newsgroups:' cfg.NNTP.s.newsgroups || cfg.crlf || ,
+                                           'Newsgroups:' cfg.NNTP.s.to || cfg.crlf || ,
                                            'Subject:' cfg.NNTP.subject || cfg.crlf || ,
                                            'User-Agent:' cfg.user_agent || cfg.crlf || ,
@@ -2368 +2368 @@
       say '   Requesting that Netlabs move the uploaded file.'
       say '   Email notifications of the release (to lists and/or individuals).'
-      say '   Newsgroup notifications of the release (to vraious newsgroups).'
+      say '   Newsgroup notifications of the release (to various newsgroups).'
       say
       say "Enter the first letter of the activity to configure or..."