(calc-embedded-finish-edit): Let math-expr-opers equal the function

math-standard-ops rather than the variable math-standard-opers.
This commit is contained in:
Jay Belanger 2007-06-20 04:13:06 +00:00
parent 16819e4854
commit 2a6f048c0f

View file

@ -403,7 +403,7 @@
(let ((val (save-excursion
(set-buffer (aref info 1))
(let ((calc-language nil)
(math-expr-opers math-standard-opers))
(math-expr-opers (math-standard-ops)))
(math-read-expr str)))))
(if (eq (car-safe val) 'error)
(progn