diff options
author | Kenichi Handa <handa@m17n.org> | 2010-10-14 11:06:31 +0900 |
---|---|---|
committer | Kenichi Handa <handa@m17n.org> | 2010-10-14 11:06:31 +0900 |
commit | 4505bd02ef18fc8b0c8977a144fbbb28b3701e33 (patch) | |
tree | 9e16bb4384e567c90c2dce34ab72b48c1f05547c /lisp/emacs-lisp | |
parent | 7ca9cfdaabe5c7dcc151f5da19b1fc7fd2b703e6 (diff) | |
parent | 9fa828240d621736a61f5938f78cc98805fdcf56 (diff) | |
download | emacs-4505bd02ef18fc8b0c8977a144fbbb28b3701e33.tar.gz emacs-4505bd02ef18fc8b0c8977a144fbbb28b3701e33.tar.bz2 emacs-4505bd02ef18fc8b0c8977a144fbbb28b3701e33.zip |
merge emacs-23
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/byte-opt.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el index 4950511ebe2..7605f457316 100644 --- a/lisp/emacs-lisp/byte-opt.el +++ b/lisp/emacs-lisp/byte-opt.el @@ -383,7 +383,7 @@ (eq 'lambda (car-safe fn))) (let ((newform (byte-compile-unfold-lambda form))) (if (eq newform form) - ;; Some error occured, avoid infinite recursion + ;; Some error occurred, avoid infinite recursion form (byte-optimize-form-code-walker newform for-effect)))) ((memq fn '(let let*)) |