Mercurial > emacs

changeset 54518:ee587e56fbc4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(describe-char): Use window-width instead of frame-width.
author Juri Linkov <juri@jurta.org>
date Tue, 23 Mar 2004 07:36:34 +0000
parents b4c64a995036
children 2d359989a04e
files lisp/descr-text.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/descr-text.el	Tue Mar 23 07:35:59 2004 +0000
+++ b/lisp/descr-text.el	Tue Mar 23 07:36:34 2004 +0000
@@ -338,7 +338,7 @@
 ;;; 			   (string-to-number (nth 2 fields))
 ;;; 			   '((0 . "Spacing")
 ;;; 			     (1 . "Overlays and interior")
-;;; 			     (7 . "Nuktas") 
+;;; 			     (7 . "Nuktas")
 ;;; 			     (8 . "Hiragana/Katakana voicing marks")
 ;;; 			     (9 . "Viramas")
 ;;; 			     (10 . "Start of fixed position classes")
@@ -589,7 +589,7 @@
 		(when (>= (+ (current-column)
 			     (or (string-match "\n" clm)
 				 (string-width clm)) 1)
-			  (frame-width))
+			  (window-width))
 		  (insert "\n")
 		  (indent-to (1+ max-width)))
 		(insert " " clm))
@@ -611,7 +611,7 @@
 			  "\n ")))
 	    (insert "these terminal codes:\n")
 	    (dotimes (i (length disp-vector))
-	      (insert (car (aref disp-vector i)) 
+	      (insert (car (aref disp-vector i))
 		      (propertize " " 'display '(space :align-to 5))
 		      (or (cdr (aref disp-vector i)) "-- not encodable --")
 		      "\n"))))