Mercurial > emacs
comparison lisp/gud.el @ 28731:2e0946b26643
(gud-gdb-find-file): Call find-file-noselect with NOWARN
argument.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Thu, 27 Apr 2000 10:41:43 +0000 |
parents | d63fb3b5adad |
children | c547172f003f |
comparison
equal
deleted
inserted
replaced
28730:f97e04a68f9f | 28731:2e0946b26643 |
---|---|
329 | 329 |
330 output)) | 330 output)) |
331 | 331 |
332 (defun gud-gdb-find-file (f) | 332 (defun gud-gdb-find-file (f) |
333 (save-excursion | 333 (save-excursion |
334 (let ((buf (find-file-noselect f))) | 334 (let ((buf (find-file-noselect f 'nowarn))) |
335 (set-buffer buf) | 335 (set-buffer buf) |
336 (gud-make-debug-menu) | 336 (gud-make-debug-menu) |
337 (local-set-key [menu-bar debug tbreak] | 337 (local-set-key [menu-bar debug tbreak] |
338 '("Temporary Breakpoint" . gud-tbreak)) | 338 '("Temporary Breakpoint" . gud-tbreak)) |
339 (local-set-key [menu-bar debug finish] '("Finish Function" . gud-finish)) | 339 (local-set-key [menu-bar debug finish] '("Finish Function" . gud-finish)) |