Fix for XEmacs's behavior of truncate-partial-width-windows.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 9603b1a..6598fbb 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,11 @@
+2001-11-09  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
+
+       * wl-summary.el (wl-summary-mode): Locally set
+       truncate-partial-window-width to nil.
+       (for XEmacs)
+
+       * wl-folder.el (wl-folder-mode): Ditto.
+
 2001-11-09  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * wl-util.el (wl-set-string-width) [Emacs]: New implementation.

diff --git a/wl/wl-folder.el b/wl/wl-folder.el
index b25110d..a8f764d 100644 (file)
--- a/wl/wl-folder.el
+++ b/wl/wl-folder.el
@@ -1424,6 +1424,8 @@ 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 0ec7284..005108f 100644 (file)
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -747,6 +747,8 @@ 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)