(ielm-eval-input): Call `error-message-string' instead of the non-existent

`ielm-format-error'.

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c49a5fbfcf8..15a7d3c6979 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-09-19  Juanma Barranquero  <lektu@terra.es>
+
+        * ielm.el (ielm-eval-input): Call `error-message-string' instead
+        of the non-existent `ielm-format-error'.
+
 2002-09-18  Richard M. Stallman  <rms@gnu.org>
 
         * dired.el (dired-mark-pop-up): Doc fix.
diff --git a/lisp/ielm.el b/lisp/ielm.el
index 3a9e5e05743..a27f0eb1e89 100644
--- a/lisp/ielm.el
+++ b/lisp/ielm.el
@@ -361,7 +361,7 @@ simply inserts a newline."
                                   (set-buffer ielm-temp-buffer))
                               (when ielm-temp-buffer
                                 (kill-buffer ielm-temp-buffer)))
-                          (error (setq ielm-result (ielm-format-error err))
+                          (error (setq ielm-result (error-message-string err))
                                  (setq ielm-error-type "Eval error"))
                           (quit (setq ielm-result "Quit during evaluation")
                                 (setq ielm-error-type "Eval error")))))