Re: set-window-point

[Nick Roberts]

Stefan Monnier writes:
 > > *** gdb-ui.el      13 Nov 2005 21:31:16 +1300      1.111
 > > --- gdb-ui.el      14 Nov 2005 12:29:46 +1300      
 > > ***************
 > > *** 2702,2708 ****
 > >              (if (re-search-forward address nil t)
 > >                  (gdb-put-breakpoint-icon (eq flag ?y) bptno))))))))
 > >       (if (not (equal gdb-frame-address "main"))
 > > !  (set-window-point (get-buffer-window buffer 0) pos))))
 >   
 > >   (defvar gdb-assembler-mode-map
 > >     (let ((map (make-sparse-keymap)))
 > > --- 2702,2709 ----
 > >              (if (re-search-forward address nil t)
 > >                  (gdb-put-breakpoint-icon (eq flag ?y) bptno))))))))
 > >       (if (not (equal gdb-frame-address "main"))
 > > !  (with-current-buffer (gdb-get-buffer 'gdb-assembler-buffer)
 > > !    (set-window-point (get-buffer-window buffer 0) pos)))))
 >   
 > >   (defvar gdb-assembler-mode-map
 > >     (let ((map (make-sparse-keymap)))
 > 
 > I don't understand the above code: what's the relationship between `buffer'
 > and `(gdb-get-buffer 'gdb-assembler-buffer)' ?
 > Also, how do you know that (get-buffer-window buffer 0) is non-nil?

Yes, buffer is (gdb-get-buffer 'gdb-assembler-buffer) so I should have
had

 (with-current-buffer buffer...

I'm just saying that I can make the buffer of the selected window current so
that set-window-point works.

If (get-buffer-window buffer 0) (buffer = gdb-assembler-buffer) is nil,
gdb-assembler-custom shouldn't get called.

Nick