From: Ken Manheimer <klm@digicool.com> Date: Tue, 17 Jun 2003 19:18:57 +0000 (+0000) Subject: Remove short-circuitying grubbing by using last grubbed buffer. It's X-Git-Tag: v2.3c1~394 X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=8e9b80fd561e68574ee313f32d3fd6cde59d7723;p=python Remove short-circuitying grubbing by using last grubbed buffer. It's evil - if the last grubbed buffer didn't happen to be the right one, you couldn't remedy. Mainline emacs compat - don't use third arg to buffer-substring (which was for explicitly identifying the buffer in which to seek the substring, and which turns out to be unnecessary). --- diff --git a/Misc/python-mode.el b/Misc/python-mode.el index 61e4f46d17..ba4f88a90b 100644 --- a/Misc/python-mode.el +++ b/Misc/python-mode.el @@ -1370,8 +1370,7 @@ problem as best as we can determine." (max (point-min) (string-match "^\\([^#]\\|#[^#]\\|#$\\)" (buffer-substring (point-min) - (point-max) - funcbuffer)) + (point-max))) )))))) (list lineno funcbuffer)) @@ -1392,10 +1391,6 @@ named for funcname or define a function funcname." (let ((buffers (buffer-list)) curbuf got) - (if (and py-pdbtrack-last-grubbed-buffer - (member py-pdbtrack-last-grubbed-buffer buffers)) - ; Prefer last grubbed buffer by putting it at the front of the list: - (setq buffers (cons py-pdbtrack-last-grubbed-buffer buffers))) (while (and buffers (not got)) (setq buf (car buffers) buffers (cdr buffers)) @@ -1404,9 +1399,10 @@ named for funcname or define a function funcname." (or (string-match funcname (buffer-name buf)) (string-match (concat "^\\s-*\\(def\\|class\\)\\s-+" funcname "\\s-*(") - (buffer-substring (point-min buf) - (point-max buf) - buf)))) + (save-excursion + (set-buffer buf) + (buffer-substring (point-min) + (point-max)))))) (setq got buf))) (setq py-pdbtrack-last-grubbed-buffer got)))