diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/calc/calcalg2.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 586b613f4fd..a58694f447f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2005-03-25 Jay Belanger <belanger@truman.edu> | ||
| 2 | |||
| 3 | * calc/calcalg2.el (calc-solve-for): Use "Variable(s)" to prompt | ||
| 4 | for variables. | ||
| 5 | |||
| 1 | 2005-03-25 Juri Linkov <juri@jurta.org> | 6 | 2005-03-25 Juri Linkov <juri@jurta.org> |
| 2 | 7 | ||
| 3 | * image-mode.el: Optimize image filename extension regexps in | 8 | * image-mode.el: Optimize image filename extension regexps in |
diff --git a/lisp/calc/calcalg2.el b/lisp/calc/calcalg2.el index a422ed33e45..d2459919fda 100644 --- a/lisp/calc/calcalg2.el +++ b/lisp/calc/calcalg2.el | |||
| @@ -149,7 +149,7 @@ | |||
| 149 | (and step (list step))))))) | 149 | (and step (list step))))))) |
| 150 | 150 | ||
| 151 | (defun calc-solve-for (var) | 151 | (defun calc-solve-for (var) |
| 152 | (interactive "sVariable to solve for: ") | 152 | (interactive "sVariable(s) to solve for: ") |
| 153 | (calc-slow-wrapper | 153 | (calc-slow-wrapper |
| 154 | (let ((func (if (calc-is-inverse) | 154 | (let ((func (if (calc-is-inverse) |
| 155 | (if (calc-is-hyperbolic) 'calcFunc-ffinv 'calcFunc-finv) | 155 | (if (calc-is-hyperbolic) 'calcFunc-ffinv 'calcFunc-finv) |