summaryrefslogtreecommitdiff
path: root/lisp/calc
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2001-11-13 07:28:01 +0000
committerEli Zaretskii <eliz@gnu.org>2001-11-13 07:28:01 +0000
commitaf32d76e49daaabfb4aee0ccdb29d55a14b86c6f (patch)
tree357093be3ca061adceddad15adecd826c8c4dfe1 /lisp/calc
parent4db5660258287d7132babe39f1d4bdbd989e3af8 (diff)
downloademacs-af32d76e49daaabfb4aee0ccdb29d55a14b86c6f.tar.gz
emacs-af32d76e49daaabfb4aee0ccdb29d55a14b86c6f.tar.bz2
emacs-af32d76e49daaabfb4aee0ccdb29d55a14b86c6f.zip
(calc-do-embedded): Call `y-or-n-p' with
correct number of arguments.
Diffstat (limited to 'lisp/calc')
-rw-r--r--lisp/calc/calc-embed.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/calc/calc-embed.el b/lisp/calc/calc-embed.el
index 5c996ea4cdd..ecfa5e13975 100644
--- a/lisp/calc/calc-embed.el
+++ b/lisp/calc/calc-embed.el
@@ -1,5 +1,5 @@
;; Calculator for GNU Emacs, part II [calc-embed.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.
@@ -202,8 +202,8 @@ This is not required to be present for user-written mode annotations.")
(if (buffer-name (aref calc-embedded-info 0))
(save-excursion
(set-buffer (aref calc-embedded-info 0))
- (or (y-or-n-p "Cancel Calc Embedded mode in buffer %s? "
- (buffer-name))
+ (or (y-or-n-p (format "Cancel Calc Embedded mode in buffer %s? "
+ (buffer-name)))
(keyboard-quit))
(calc-embedded nil)))
(calc-embedded arg end obeg oend)))
@@ -308,7 +308,7 @@ This is not required to be present for user-written mode annotations.")
(error (nth 2 (aref info 8)))))
(calc-wrapper
(setq str (math-showing-full-precision
- (math-format-nice-expr (aref info 8) (screen-width))))
+ (math-format-nice-expr (aref info 8) (frame-width))))
(calc-edit-mode (list 'calc-embedded-finish-edit info))
(insert str "\n")))
(calc-show-edit-buffer)