From: yamaoka <yamaoka>
Date: Wed, 22 Dec 2004 07:53:24 +0000 (+0000)
Subject: (wl-texinfo-format-file): Bind undo-outer-limit.
X-Git-Tag: wl-2_14-root~114
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=f0edf5988a0a6b6c2ed98e1c09907ee847098132;p=elisp%2Fwanderlust.git

(wl-texinfo-format-file): Bind undo-outer-limit.
---

diff --git a/ChangeLog b/ChangeLog
index c9de53f..04fe0fb 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2004-12-22  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* WL-MK (wl-texinfo-format-file): Bind undo-outer-limit.
+
 2004-12-07  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
 	* INSTALL, INSTALL.ja: Updated recommended version of FLIM to
diff --git a/WL-MK b/WL-MK
index 19c9c38..abaac88 100644
--- a/WL-MK
+++ b/WL-MK
@@ -385,7 +385,8 @@
 (defun wl-texinfo-format-file (lang)
   (require 'wl-vars) ;; for 'wl-cs-local
   (or (wl-texinfo-check-newer lang)
-      (let (obuf)
+      (let (obuf
+	    (undo-outer-limit (eval '(lsh -1 -1))))
 	;; Support old texinfmt.el
 	(require 'ptexinfmt (expand-file-name "ptexinfmt.el" UTILSDIR))
 	(find-file (expand-file-name (wl-texinfo-texi-file lang) DOCDIR))