From 57e828aed9db06cad943a34890644ea0b54dc9da Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 19 Feb 2008 04:30:50 +0000 Subject: [PATCH] (gdb-output-sink): Define with an invalid value. (gdb): Initialize it here instead. --- lisp/ChangeLog | 3 +++ lisp/progmodes/gdb-ui.el | 3 ++- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 07fa73f582b..3916891fdac 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2008-02-19 Stefan Monnier + * progmodes/gdb-ui.el (gdb-output-sink): Define with an invalid value. + (gdb): Initialize it here instead. + * files.el (locate-dominating-file): Fix thinko in last change. Reported by Bruce Stephens . diff --git a/lisp/progmodes/gdb-ui.el b/lisp/progmodes/gdb-ui.el index 0d3f364ff39..71d850a8b8c 100644 --- a/lisp/progmodes/gdb-ui.el +++ b/lisp/progmodes/gdb-ui.el @@ -150,7 +150,7 @@ Emacs can't find.") (defvar gdb-prompting nil "True when gdb is idle with no pending input.") -(defvar gdb-output-sink 'user +(defvar gdb-output-sink nil "The disposition of the output of the current gdb command. Possible values are these symbols: @@ -317,6 +317,7 @@ session." (local-set-key "\C-i" 'gud-gdb-complete-command) (setq comint-prompt-regexp "^(.*gdb[+]?) *") (setq paragraph-start comint-prompt-regexp) + (setq gdb-output-sink 'user) (setq gdb-first-prompt t) (setq gud-running nil) (setq gdb-ready nil) -- 2.39.5