From: Juri Linkov <juri@jurta.org>
Date: Tue, 23 Mar 2004 07:35:59 +0000 (+0000)
Subject: (list-one-abbrev-table): Use window-width instead of frame-width.
X-Git-Tag: ttn-vms-21-2-B4~7139
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4a010175570a7c229c286bd32317a6c85101a838;p=emacs.git

(list-one-abbrev-table): Use window-width instead of frame-width.
---

diff --git a/lisp/abbrevlist.el b/lisp/abbrevlist.el
index 77cf920b422..9c8b0e0d583 100644
--- a/lisp/abbrevlist.el
+++ b/lisp/abbrevlist.el
@@ -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)))