procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(gdb-create-define-alist): Don't create a

Browse source 
list of #defines for remote files.
(gdb-source-info): Only show main if it has been found.
This commit is contained in:
Nick Roberts 2008-07-16 23:02:52 +00:00
parent 51390df783
commit cf7238adf9
1 changed files with 9 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
lisp/progmodes/gdb-ui.el
View file

@ -470,11 +470,14 @@ otherwise do not."
(output
(with-output-to-string
(with-current-buffer standard-output
(and file (file-exists-p file)
(call-process shell-file-name file
(list t nil) nil "-c"
(concat gdb-cpp-define-alist-program " "
gdb-cpp-define-alist-flags))))))
(and file
(file-exists-p file)
;; call-process doesn't work with remote file names.
(not (file-remote-p default-directory))
(call-process shell-file-name file
(list t nil) nil "-c"
(concat gdb-cpp-define-alist-program " "
gdb-cpp-define-alist-flags))))))
(define-list (split-string output "\n" t)) (name))
(setq gdb-define-alist nil)
(dolist (define define-list)
@ -3273,7 +3276,7 @@ buffers."
(if gdb-many-windows
(gdb-setup-windows)
(gdb-get-buffer-create 'gdb-breakpoints-buffer)
(if gdb-show-main
(if (and gdb-show-main gdb-main-file)
(let ((pop-up-windows t))
(display-buffer (gud-find-file gdb-main-file)))))
(setq gdb-ready t))