From 90132c14854a1b92cc2141ea2a863bc0cbdcfcff Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 9 Nov 2011 10:00:32 -0500 Subject: * lisp/progmodes/python.el (python-beginning-of-statement): Rewrite. Fixes: debbugs:2703 --- lisp/progmodes/python.el | 21 ++++++--------------- 1 file changed, 6 insertions(+), 15 deletions(-) (limited to 'lisp/progmodes/python.el') diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el index 38bf9552b2a..8615400bf6a 100644 --- a/lisp/progmodes/python.el +++ b/lisp/progmodes/python.el @@ -948,22 +948,12 @@ Finds end of innermost nested class or method definition." "Go to start of current statement. Accounts for continuation lines, multi-line strings, and multi-line bracketed expressions." - (beginning-of-line) - (python-beginning-of-string) - (let (point) - (while (and (python-continuation-line-p) - (if point - (< (point) point) - t)) - (beginning-of-line) + (while (if (python-backslash-continuation-line-p) - (progn - (forward-line -1) - (while (python-backslash-continuation-line-p) - (forward-line -1))) - (python-beginning-of-string) - (python-skip-out)) - (setq point (point)))) + (progn (forward-line -1) t) + (beginning-of-line) + (or (python-beginning-of-string) + (python-skip-out)))) (back-to-indentation)) (defun python-skip-out (&optional forward syntax) @@ -971,6 +961,7 @@ multi-line bracketed expressions." Skip forward if FORWARD is non-nil, else backward. If SYNTAX is non-nil it is the state returned by `syntax-ppss' at point. Return non-nil if and only if skipping was done." + ;; FIXME: Use syntax-ppss-toplevel-pos. (let ((depth (syntax-ppss-depth (or syntax (syntax-ppss)))) (forward (if forward -1 1))) (unless (zerop depth) -- cgit v1.2.1