From 9fe0df07710c297f935c5e796f33944457d4abec Mon Sep 17 00:00:00 2001
From: yoichi <yoichi>
Date: Mon, 12 Nov 2001 11:31:23 +0000
Subject: [PATCH] Undo last change for truncate-partial-width-windows. Add
 sample setting for XEmacs.

---
 samples/en/dot.wl |    2 ++
 samples/ja/dot.wl |    2 ++
 wl/ChangeLog      |    6 ++++++
 wl/wl-folder.el   |    2 --
 wl/wl-summary.el  |    2 --
 5 files changed, 10 insertions(+), 4 deletions(-)

diff --git a/samples/en/dot.wl b/samples/en/dot.wl
index 47fa7cf..88c8c23 100644
--- a/samples/en/dot.wl
+++ b/samples/en/dot.wl
@@ -104,6 +104,8 @@
 ;; Truncate long lines.
 ;(setq wl-message-truncate-lines t)
 ;(setq wl-draft-truncate-lines t)
+;; Following line is needed for XEmacs.
+;(setq truncate-partial-width-windows nil)
 
 ;; Open new frame for draft buffer.
 ;(setq wl-draft-use-frame t)
diff --git a/samples/ja/dot.wl b/samples/ja/dot.wl
index 65e638e..191c3e1 100644
--- a/samples/ja/dot.wl
+++ b/samples/ja/dot.wl
@@ -103,6 +103,8 @@
 ;; 長い行を切り縮める
 ;(setq wl-message-truncate-lines t)
 ;(setq wl-draft-truncate-lines t)
+;; XEmacs の場合、以下が必要
+;(setq truncate-partial-width-windows nil)
 
 ;; ドラフトを新しいフレームで書く
 ;(setq wl-draft-use-frame t)
diff --git a/wl/ChangeLog b/wl/ChangeLog
index 6598fbb..404738d 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,9 @@
+2001-11-12  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
+
+	* wl-summary.el (wl-summary-mode): Undo last change.
+
+	* wl-folder.el (wl-folder-mode): Ditto.
+
 2001-11-09  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
 
 	* wl-summary.el (wl-summary-mode): Locally set
diff --git a/wl/wl-folder.el b/wl/wl-folder.el
index a8f764d..b25110d 100644
--- a/wl/wl-folder.el
+++ b/wl/wl-folder.el
@@ -1424,8 +1424,6 @@ Entering Folder mode calls the value of `wl-folder-mode-hook'."
   (use-local-map wl-folder-mode-map)
   (setq buffer-read-only t)
   (setq inhibit-read-only nil)
-  (make-local-variable 'truncate-partial-width-windows)
-  (setq truncate-partial-width-windows nil)
   (setq truncate-lines t)
   (setq wl-folder-buffer-cur-entity-id nil
 	wl-folder-buffer-cur-path nil
diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index 005108f..0ec7284 100644
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -747,8 +747,6 @@ Entering Folder mode calls the value of `wl-summary-mode-hook'."
   (use-local-map wl-summary-mode-map)
 ;;;(setq default-directory (or wl-tmp-dir (expand-file-name "~/")))
   (setq buffer-read-only t)
-  (make-local-variable 'truncate-partial-width-windows)
-  (setq truncate-partial-width-windows nil)
   (setq truncate-lines t)
 ;;;(make-local-variable 'tab-width)
 ;;;(setq tab-width 1)
-- 
1.7.10.4