mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 10:30:25 -08:00
(js-end-of-defun): Remove malformed and unneeded let.
This commit is contained in:
parent
6726c25e2d
commit
07eae5c5e0
2 changed files with 7 additions and 6 deletions
|
|
@ -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…
Add table
Add a link
Reference in a new issue