🚀 go-pugleaf

>>>>> On 12 Dec 92 07:41:59 GMT, cloos@theory.TC.Cornell.EDU (James H.
 James> Cloos Jr.) said: Nntp-Posting-Host: theory.tc.cornell.edu

>>>>> In article <CLOOS.92Dec5023816@theory.TC.Cornell.EDU>, I write:

James> So, how do you set up gnus to post to a different nntp server
James> than it is using to read?  Thanks for any replies.

 James> Haven't gotten any replies yet, so I tried to see what I could
 James> do.  I have not had much luck.  I tried defvar'ing
 James> gnus-nntp-posting-server and changing the only reference to
 James> gnus-nntp-server to be found in gnuspost.el to use
 James> ...-posting-server if it was non-nil, and to use ...-server
 James> otherwise.  This did not help.

 James> I did discover that gnus has to open the server to post just
 James> as if it were starting up a news reading session, unles of
 James> course the user is already reading news.  Then the same
 James> connection is used.

 James> This begs the question: is it possible to be reading news from
 James> two different nntp servers in two different windows at the
 James> same time?  It seems that this would be the simplest way of
 James> handling the situation.  Not that this way is all that simple,
 James> from what I see.


	This is my hack (with help)  to post to a different nntp host.
my situation is not general as I CAN post to the default nntp server
on my system via inews,  but it is very very slow under gnus so I read
from another.  I am not a programmer, and the grep -v just removes
some weird error that puts two of my sigs in.  you'll see it at the
end of my post.   This should at least help.  you should be able to
put whatever you want in to the shell command.


Nathan

ps.  the sed ... piccolo... piccolo changes the nntp server entry in
the post file.




(defun nntp-request-post ()
  "Post a new news in current buffer."
;  (if (nntp-send-command "^[23].*\r$" "POST")
;      (progn
;	(nntp-encode-text)
;	(nntp-send-region-to-server (point-min) (point-max))
;	;; 1.2a NNTP's post command is buggy. "^M" (\r) is not
;	;;  appended to end of the status message.
;	(nntp-wait-for-response "^[23].*$")

  (shell-command-on-region (point-min) (point-max)
			   nil 1)
	)
--
--
/  | / /__|  /  /---/ /__| /  | /    nathan@chemres.tn.cornell.edu