[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
RE: `save-excursion' defeated by `set-buffer'
From: |
Drew Adams |
Subject: |
RE: `save-excursion' defeated by `set-buffer' |
Date: |
Sun, 10 Jan 2010 10:06:41 -0800 |
> A is inserted four places after point, but point does not move:
> (with-current-buffer "*scratch*" (forward-char 4) (insert "A"))
Actually, I think that `point' does move. What doesn't move is `window-point'.
Which is the correct behavior.
Try `M-x foo' (a) with *scratch* displayed and (b) without *scratch* displayed:
(defun foo ()
(interactive)
(with-current-buffer "*scratch*"
(bar) (forward-char 4)
(bar) (insert "A")
(bar)))
(defun bar ()
(message
"%S, %S, %S"
(current-buffer)
(point)
(and (get-buffer-window "*scratch*" 0)
(window-point
(get-buffer-window "*scratch*" 0)))))
Starting with point at 1, you see this:
(a) *scratch* displayed
#<buffer *scratch*>, 1, 1
#<buffer *scratch*>, 5, 1
#<buffer *scratch*>, 6, 1
(b) *scratch* not displayed
#<buffer *scratch*>, 1, nil
#<buffer *scratch*>, 5, nil
#<buffer *scratch*>, 6, nil
- Re: `save-excursion' defeated by `set-buffer', (continued)
- Re: `save-excursion' defeated by `set-buffer', Stefan Monnier, 2010/01/09
- Re: `save-excursion' defeated by `set-buffer', David Kastrup, 2010/01/10
- Re: `save-excursion' defeated by `set-buffer', Stefan Monnier, 2010/01/10
- Re: `save-excursion' defeated by `set-buffer', David Kastrup, 2010/01/11
- Re: `save-excursion' defeated by `set-buffer', martin rudalics, 2010/01/11
- Re: `save-excursion' defeated by `set-buffer', Stefan Monnier, 2010/01/11
- RE: `save-excursion' defeated by `set-buffer', Drew Adams, 2010/01/10
- Re: `save-excursion' defeated by `set-buffer', Stefan Monnier, 2010/01/09
- Re: `save-excursion' defeated by `set-buffer', Harald Hanche-Olsen, 2010/01/10
- Re: `save-excursion' defeated by `set-buffer', martin rudalics, 2010/01/10
- RE: `save-excursion' defeated by `set-buffer',
Drew Adams <=
- Re: `save-excursion' defeated by `set-buffer', Harald Hanche-Olsen, 2010/01/10
Re: `save-excursion' defeated by `set-buffer', Davis Herring, 2010/01/04