procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(python-end-of-block): Revert last change.

Browse source 
(python-end-of-statement): Make sure we move *forward*.
This commit is contained in:
Stefan Monnier 2007-05-09 16:53:13 +00:00
parent 44a07c5a3c
commit 0f21ecf3c5
1 changed files with 9 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

19
lisp/progmodes/python.el
View file

@ -883,10 +883,13 @@ On a comment line, go to end of line."
nil)
((eq 'string (syntax-ppss-context s))
;; Go to start of string and skip it.
(goto-char (nth 8 s))
(condition-case () ; beware invalid syntax
(progn (forward-sexp) t)
(error (end-of-line))))
(let ((pos (point)))
(goto-char (nth 8 s))
(condition-case () ; beware invalid syntax
(progn (forward-sexp) t)
;; If there's a mismatched string, make sure
;; we still overall move *forward*.
(error (goto-char pos) (end-of-line)))))
((python-skip-out t s))))
(end-of-line))
(unless comment
@ -981,15 +984,11 @@ don't move and return nil. Otherwise return t."
(_ (if (python-comment-line-p)
(python-skip-comments/blanks t)))
(ci (current-indentation))
(open (python-open-block-statement-p))
opoint)
(open (python-open-block-statement-p)))
(if (and (zerop ci) (not open))
(not (goto-char point))
(catch 'done
(setq opoint (point))
(while (and (zerop (python-next-statement))
(not (= opoint (point))))
(setq opoint (point))
(while (zerop (python-next-statement))
(when (or (and open (<= (current-indentation) ci))
(< (current-indentation) ci))
(python-skip-comments/blanks t)