From 07eae5c5e0769d5ade88330dede40231c88f2f56 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 18 Sep 2009 07:16:49 +0000 Subject: [PATCH] (js-end-of-defun): Remove malformed and unneeded let. --- lisp/ChangeLog | 2 ++ 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 @@ 2009-09-18 Glenn Morris + * 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. 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." "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) -- 2.39.2