/[emacs]/emacs/lisp/ielm.el
ViewVC logotype

Diff of /emacs/lisp/ielm.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.28 by rms, Wed Sep 18 16:01:43 2002 UTC revision 1.29 by lektu, Thu Sep 19 07:32:00 2002 UTC
# Line 361  simply inserts a newline." Line 361  simply inserts a newline."
361                                    (set-buffer ielm-temp-buffer))                                    (set-buffer ielm-temp-buffer))
362                                (when ielm-temp-buffer                                (when ielm-temp-buffer
363                                  (kill-buffer ielm-temp-buffer)))                                  (kill-buffer ielm-temp-buffer)))
364                            (error (setq ielm-result (ielm-format-error err))                            (error (setq ielm-result (error-message-string err))
365                                   (setq ielm-error-type "Eval error"))                                   (setq ielm-error-type "Eval error"))
366                            (quit (setq ielm-result "Quit during evaluation")                            (quit (setq ielm-result "Quit during evaluation")
367                                  (setq ielm-error-type "Eval error")))))                                  (setq ielm-error-type "Eval error")))))

Legend:
Removed from v.1.28  
changed lines
  Added in v.1.29

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26