From: Karl Heuer <kwzh@gnu.org>
Date: Mon, 26 Apr 1999 04:13:01 +0000 (+0000)
Subject: (texinfo-format-buffer): Bind coding-system-for-write, to avoid hanging when
X-Git-Tag: emacs-20.4~328
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2990dcd48431cfb159dbc0e1b6f9738cd35866f3;p=emacs.git

(texinfo-format-buffer): Bind coding-system-for-write, to avoid hanging when
non-interactive.
---

diff --git a/lisp/textmodes/texinfmt.el b/lisp/textmodes/texinfmt.el
index b1653ffa366..101737227b2 100644
--- a/lisp/textmodes/texinfmt.el
+++ b/lisp/textmodes/texinfmt.el
@@ -113,7 +113,8 @@ Non-nil argument (prefix, if interactive) means don't make tag table
 and don't split the file if large.  You can use Info-tagify and
 Info-split to do these manually."
   (interactive "P")
-  (let ((lastmessage "Formatting Info file..."))
+  (let ((lastmessage "Formatting Info file...")
+	(coding-system-for-write buffer-file-coding-system))
     (message lastmessage)
     (widen)
     (texinfo-format-buffer-1)