From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/4559 Path: main.gmane.org!not-for-mail From: SAKIYAMA Nobuo Newsgroups: gmane.emacs.gnus.general Subject: [nntp.el] patch for the unofficial version of mule based on 19.30 Date: Sat, 23 Dec 1995 20:18:09 +0900 Message-ID: <10696.819717489@deneb.is.s.u-tokyo.ac.jp> NNTP-Posting-Host: coloc-standby.netfonds.no X-Trace: main.gmane.org 1035145290 30083 80.91.224.250 (20 Oct 2002 20:21:30 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 20:21:30 +0000 (UTC) Return-Path: ding-request@ifi.uio.no Original-Received: from ifi.uio.no (ifi.uio.no [129.240.64.2]) by miranova.com (8.6.11/8.6.9) with ESMTP id DAA14983 for ; Sat, 23 Dec 1995 03:37:52 -0800 Original-Received: from acrux.is.s.u-tokyo.ac.jp (acrux.is.s.u-tokyo.ac.jp [133.11.14.5]) by ifi.uio.no with ESMTP (8.6.11/ifi2.4) id for ; Sat, 23 Dec 1995 12:18:14 +0100 Original-Received: from deneb.is.s.u-tokyo.ac.jp by acrux.is.s.u-tokyo.ac.jp (8.6.10/TISN-1.3/R3) id UAA15435; Sat, 23 Dec 1995 20:18:09 +0900 Original-To: ding@ifi.uio.no Xref: main.gmane.org gmane.emacs.gnus.general:4559 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:4559 If you are using the current version of September Gnus on the unofficial version of mule based on 19.29 or 19.30 and not using tm package, your posting messages to the news would be damaged. This is a patch resolving this problem. Of course, this code will be slower than the original. *** nntp.el.orig Thu Dec 21 12:09:48 1995 --- nntp.el Sat Dec 23 19:36:47 1995 *************** *** 1002,1008 **** (size 100)) ;Size of text sent at once. (while (/= last (point-max)) (process-send-region ! nntp-server-process last (setq last (min (+ last size) (point-max)))) ;; Read any output from the server. May be unnecessary. (accept-process-output))) ;; Delete the area we sent. --- 1002,1013 ---- (size 100)) ;Size of text sent at once. (while (/= last (point-max)) (process-send-region ! nntp-server-process ! last ! (setq last (save-excursion ! (goto-char (min (+ last size) (point-max))) ! (or (eobp) (forward-char 1)) ! (point)))) ;; Read any output from the server. May be unnecessary. (accept-process-output))) ;; Delete the area we sent. -- SAKIYAMA Nobuo nobuo@is.s.u-tokyo.ac.jp