truncate-lines bug fixed

alexott · Mar 22, 2001 · a56fee0 · a56fee0
1 parent f579618
commit a56fee0
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/tree-buffer.el b/tree-buffer.el
@@ -251,6 +251,7 @@ EXPAND-SYMBOL-BEFORE: If not nil then the expand-symbol \(is displayed before
   (set-buffer (get-buffer-create name))
 
   (make-local-variable 'truncate-lines)
+  (make-local-variable 'truncate-partial-width-windows)
   (make-local-variable 'tree-buffer-key-map)
   (make-local-variable 'tree-buffer-root)
   (make-local-variable 'tree-buffer-nodes)
@@ -266,6 +267,7 @@ EXPAND-SYMBOL-BEFORE: If not nil then the expand-symbol \(is displayed before
   (make-local-variable 'tree-buffer-highlight-overlay)
 
   (setq truncate-lines tr-lines)
+  (setq truncate-partial-width-windows tr-lines)
   (setq tree-buffer-key-map (make-sparse-keymap))
   (setq tree-node-selected-fn node-selected-fn)
   (setq tree-node-expanded-fn node-expanded-fn)