mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-29 11:02:01 +00:00
(js-end-of-defun): Remove malformed and unneeded let.
This commit is contained in:
parent
6726c25e2d
commit
07eae5c5e0
@ -1,5 +1,7 @@
|
||||
2009-09-18 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* progmodes/js.el (js-end-of-defun): Remove malformed and unneeded let.
|
||||
|
||||
* emacs-lisp/derived.el (define-derived-mode): Fix paren typo in
|
||||
definition of abbrev table.
|
||||
|
||||
|
@ -1211,12 +1211,11 @@ LIMIT defaults to point."
|
||||
"Value of `end-of-defun-function' for `js-mode'."
|
||||
(setq arg (or arg 1))
|
||||
(while (and (not (bobp)) (< arg 0))
|
||||
(let (orig-pos (point))
|
||||
(incf arg)
|
||||
(js-beginning-of-defun)
|
||||
(js-beginning-of-defun)
|
||||
(unless (bobp)
|
||||
(js-end-of-defun))))
|
||||
(incf arg)
|
||||
(js-beginning-of-defun)
|
||||
(js-beginning-of-defun)
|
||||
(unless (bobp)
|
||||
(js-end-of-defun)))
|
||||
|
||||
(while (> arg 0)
|
||||
(decf arg)
|
||||
|
Loading…
Reference in New Issue
Block a user