andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source 
`math-read-big-expr' doesn't work.
This commit is contained in:
Jay Belanger 2006-04-27 18:40:41 +00:00
parent cb58ea3322
commit a48b489eb9
2 changed files with 8 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
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

4
lisp/calc/calc-embed.el
View file

@ -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