(python-end-of-block): Avoid looping forever if python-next-statement

fails.
This commit is contained in:
Chong Yidong 2007-04-16 18:55:29 +00:00
parent 80dce3a4b7
commit 003586aae6

View file

@ -981,11 +981,15 @@ 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)))
(open (python-open-block-statement-p))
opoint)
(if (and (zerop ci) (not open))
(not (goto-char point))
(catch 'done
(while (zerop (python-next-statement))
(setq opoint (point))
(while (and (zerop (python-next-statement))
(not (= opoint (point))))
(setq opoint (point))
(when (or (and open (<= (current-indentation) ci))
(< (current-indentation) ci))
(python-skip-comments/blanks t)