Commit a48b489e authored by Jay Belanger's avatar Jay Belanger
Browse files

(calc-embedded-make-info): Use `math-read-expr' when

`math-read-big-expr' doesn't work.
parent cb58ea33
2006-04-27 Jay Belanger <belanger@truman.edu>
* calc-embed.el (calc-embedded-make-info): Use `math-read-expr' to
read expression when `math-read-big-expr' doesn't work.
2006-04-27 Reiner Steib <Reiner.Steib@gmx.de>
 
* startup.el (command-line-1): Display warning when
......
......@@ -932,7 +932,9 @@ The command \\[yank] can retrieve it from there."
(substring str pref-len suff-pos)))
(if (string-match "[^ \t\n]" str)
(setq pref-len 0
val (math-read-big-expr str))
val (condition-case nil
(math-read-big-expr str)
(error (math-read-expr str))))
(setq val nil))))
(if (eq (car-safe val) 'error)
(setq val (list 'error
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment