From 24c4abf9a1cad80c409b598695aa74da90303dae Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Fri, 4 Jan 2002 14:34:43 +0000 Subject: [PATCH] * nnspool.el (nnspool-request-post): Ditto. --- lisp/gnus/ChangeLog | 1 + lisp/gnus/nnspool.el | 6 ++++-- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 83f8d7b796b..015e07e5bc2 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -4,6 +4,7 @@ * mm-util.el (mm-use-find-coding-systems-region): New variable. (mm-find-mime-charset-region): Use it. * nntp.el (nntp-send-buffer): Use mm-with-unibyte-current-buffer. + * nnspool.el (nnspool-request-post): Ditto. 2002-01-01 ShengHuo ZHU diff --git a/lisp/gnus/nnspool.el b/lisp/gnus/nnspool.el index b33a2dbb50e..ffc0532446a 100644 --- a/lisp/gnus/nnspool.el +++ b/lisp/gnus/nnspool.el @@ -1,7 +1,8 @@ ;;; nnspool.el --- spool access for GNU Emacs ;; Copyright (C) 1988, 1989, 1990, 1993, 1994, 1995, 1996, 1997, 1998, -;; 2000 Free Software Foundation, Inc. +;; 2000, 2002 +;; Free Software Foundation, Inc. ;; Author: Masanobu UMEDA ;; Lars Magne Ingebrigtsen @@ -327,7 +328,8 @@ there.") () (nnheader-report 'nnspool "") (set-process-sentinel proc 'nnspool-inews-sentinel) - (process-send-region proc (point-min) (point-max)) + (mm-with-unibyte-current-buffer + (process-send-region proc (point-min) (point-max))) ;; We slap a condition-case around this, because the process may ;; have exited already... (ignore-errors -- 2.39.5