From: yamaoka <yamaoka>
Date: Wed, 27 Sep 2000 22:06:10 +0000 (+0000)
Subject: Synch with Wanderlust.
X-Git-Tag: t-gnus-6_14-quimby-before-installer-changed-~80
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=3bec626de417907c37dda4d5e16f4642316c810d;p=elisp%2Fgnus.git-

Synch with Wanderlust.
---

diff --git a/ChangeLog b/ChangeLog
index 92aa097..5d33888 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2000-09-27  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+	* list/ptexinfmt.el (texinfo-multitable-widths): Fix
+	broken-facility probrem when use multitable unsupported
+	texinfmt.el.
+
 2000-09-26  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
 	* lisp/ptexinfmt.el (texinfo-format-printindex): Use (featurep
diff --git a/lisp/ptexinfmt.el b/lisp/ptexinfmt.el
index a129355..79657ec 100644
--- a/lisp/ptexinfmt.el
+++ b/lisp/ptexinfmt.el
@@ -96,14 +96,17 @@
 ;; @multitable
 (broken-facility texinfo-multitable-widths
   "texinfo-multitable-widths unsupport wide-char."
-  (with-temp-buffer
-    (let ((str "幅広文字"))
-      (texinfo-mode)
-      (insert (format " {%s}\n" str))
-      (goto-char (point-min))
-      (if (= (car (texinfo-multitable-widths)) (length str))
-	  nil
-	t)))
+  (if (fboundp 'texinfo-multitable-widths)
+      (with-temp-buffer
+	(let ((str "幅広文字"))
+	  (texinfo-mode)
+	  (insert (format " {%s}\n" str))
+	  (goto-char (point-min))
+	  (if (= (car (texinfo-multitable-widths)) (length str))
+	      nil
+	    t)))
+    ;; function definition is void
+    t)
   ptexinfmt-disable-broken-notice)
 
 (broken-facility texinfo-multitable-item