Mercurial > emacs

diff lisp/calc/calc-sel.el @ 40998:ee9c2872370b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use `frame-width' instead of `screen-width', `frame-height' instead of `screen-height', and, `executing-kbd-macro' instead of `executing-macro'.
author Eli Zaretskii <eliz@gnu.org>
date Tue, 13 Nov 2001 07:30:58 +0000
parents 2fb9d407ae73
children 73f364fd8aaa
line wrap: on
line diff
--- a/lisp/calc/calc-sel.el	Tue Nov 13 07:29:33 2001 +0000
+++ b/lisp/calc/calc-sel.el	Tue Nov 13 07:30:58 2001 +0000
@@ -1,5 +1,5 @@
 ;; Calculator for GNU Emacs, part II [calc-sel.el]
-;; Copyright (C) 1990, 1991, 1992, 1993 Free Software Foundation, Inc.
+;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc.
 ;; Written by Dave Gillespie, daveg@synaptics.com.
 
 ;; This file is part of GNU Emacs.
@@ -672,7 +672,7 @@
 	  (sel (or (calc-auto-selection entry) expr))
 	  alg)
      (let ((str (math-showing-full-precision
-		 (math-format-nice-expr sel (screen-width)))))
+		 (math-format-nice-expr sel (frame-width)))))
        (calc-edit-mode (list 'calc-finish-selection-edit
 			     num (list 'quote sel) reselect))
        (insert str "\n"))))