diff options
| author | Glenn Morris | 2009-09-18 07:16:49 +0000 |
|---|---|---|
| committer | Glenn Morris | 2009-09-18 07:16:49 +0000 |
| commit | 07eae5c5e0769d5ade88330dede40231c88f2f56 (patch) | |
| tree | b6ca6d4765c97904db7fd2660840270e8aa643b7 /lisp | |
| parent | 6726c25e2d185adcf10e0d95f70f3ab26528cadc (diff) | |
| download | emacs-07eae5c5e0769d5ade88330dede40231c88f2f56.tar.gz emacs-07eae5c5e0769d5ade88330dede40231c88f2f56.zip | |
(js-end-of-defun): Remove malformed and unneeded let.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/progmodes/js.el | 11 |
2 files changed, 7 insertions, 6 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2b661b588b0..dab341513a3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,7 @@ | |||
| 1 | 2009-09-18 Glenn Morris <rgm@gnu.org> | 1 | 2009-09-18 Glenn Morris <rgm@gnu.org> |
| 2 | 2 | ||
| 3 | * progmodes/js.el (js-end-of-defun): Remove malformed and unneeded let. | ||
| 4 | |||
| 3 | * emacs-lisp/derived.el (define-derived-mode): Fix paren typo in | 5 | * emacs-lisp/derived.el (define-derived-mode): Fix paren typo in |
| 4 | definition of abbrev table. | 6 | definition of abbrev table. |
| 5 | 7 | ||
diff --git a/lisp/progmodes/js.el b/lisp/progmodes/js.el index db8a52330c1..d2264043cb5 100644 --- a/lisp/progmodes/js.el +++ b/lisp/progmodes/js.el | |||
| @@ -1211,12 +1211,11 @@ LIMIT defaults to point." | |||
| 1211 | "Value of `end-of-defun-function' for `js-mode'." | 1211 | "Value of `end-of-defun-function' for `js-mode'." |
| 1212 | (setq arg (or arg 1)) | 1212 | (setq arg (or arg 1)) |
| 1213 | (while (and (not (bobp)) (< arg 0)) | 1213 | (while (and (not (bobp)) (< arg 0)) |
| 1214 | (let (orig-pos (point)) | 1214 | (incf arg) |
| 1215 | (incf arg) | 1215 | (js-beginning-of-defun) |
| 1216 | (js-beginning-of-defun) | 1216 | (js-beginning-of-defun) |
| 1217 | (js-beginning-of-defun) | 1217 | (unless (bobp) |
| 1218 | (unless (bobp) | 1218 | (js-end-of-defun))) |
| 1219 | (js-end-of-defun)))) | ||
| 1220 | 1219 | ||
| 1221 | (while (> arg 0) | 1220 | (while (> arg 0) |
| 1222 | (decf arg) | 1221 | (decf arg) |