# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1080027359 0
# Node ID b4c64a995036385327c12678d924fea4ee7b6d96
# Parent  796bcfb5fa61100937d9e78f8c76ebe239abc89b
(list-one-abbrev-table): Use window-width instead of frame-width.

diff -r 796bcfb5fa61 -r b4c64a995036 lisp/abbrevlist.el
--- a/lisp/abbrevlist.el	Tue Mar 23 07:35:35 2004 +0000
+++ b/lisp/abbrevlist.el	Tue Mar 23 07:35:59 2004 +0000
@@ -39,7 +39,7 @@
 	  abbrev-table)
 	(setq abbrev-list (sort abbrev-list 'string-lessp))
 	(while abbrev-list
-	  (if (> (+ first-column 40) (frame-width))
+	  (if (> (+ first-column 40) (window-width))
 	      (progn
 		(insert "\n")
 		(setq first-column 0)))