[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: possible `with-current-buffer' bug
From: |
Stephen Berman |
Subject: |
Re: possible `with-current-buffer' bug |
Date: |
Sun, 06 Feb 2011 20:10:27 +0100 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (gnu/linux) |
On Mon, 7 Feb 2011 01:30:30 +0800 Le Wang <l26wang@gmail.com> wrote:
> Hi,
>
>
> Could someone follow these steps and tell me if I'm going insane?
> "compilation-disable-input" seems to be set by with-current-buffer.
>
> 1. emacs -Q
>
> 2. paste into scratch:
>
> (require 'compile)
>
> (defun foo ()
> (interactive)
> (compilation-start "blahasdfasdf" 'grep-mode))
>
> 3. M-x eval-current-buffer
> 4. M-x foo
> 5. (confirm "compilation-disable-input" is nil) C-h v
> compilation-disable-input
> 5. (instrument compilation-start and step through it) C-h f compilation-start
> C-x o <tab> <return> M-x edebug-defun M-x foo
>
> As soon as I get inside the first "(with-current-buffer () ... " form, the
> value of "compilation-disable-input" changes from nil to t. I''ve seen this
> with NTEmacs 23.2.1 and CVS build 20110112.
See grep.el:
(define-compilation-mode grep-mode "Grep"
"Sets `grep-last-buffer' and `compilation-window-height'."
(setq grep-last-buffer (current-buffer))
(set (make-local-variable 'tool-bar-map) grep-mode-tool-bar-map)
(set (make-local-variable 'compilation-error-face)
grep-hit-face)
(set (make-local-variable 'compilation-error-regexp-alist)
grep-regexp-alist)
(set (make-local-variable 'compilation-process-setup-function)
'grep-process-setup)
(set (make-local-variable 'compilation-disable-input) t))
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
Steve Berman
- possible `with-current-buffer' bug, Le Wang, 2011/02/06
- Re: possible `with-current-buffer' bug,
Stephen Berman <=
- Re: possible `with-current-buffer' bug, Le Wang, 2011/02/07
- Re: possible `with-current-buffer' bug, Tassilo Horn, 2011/02/07
- Re: possible `with-current-buffer' bug, Le Wang, 2011/02/07
- Re: possible `with-current-buffer' bug, Tassilo Horn, 2011/02/07
- Re: possible `with-current-buffer' bug, Thierry Volpiatto, 2011/02/07
- Re: possible `with-current-buffer' bug, Eli Zaretskii, 2011/02/07
- Re: possible `with-current-buffer' bug, Le Wang, 2011/02/07