Mercurial > emacs

diff lisp/progmodes/gdb-mi.el @ 109577:8a7bf813ce36

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* net/tramp.el (tramp-handle-start-file-process): Check only for `remote-tty' process property. (tramp-open-shell): Don't check for tty. (tramp-open-connection-setup-interactive-shell): Set `remote-tty' process property. * progmodes/gdb-mi.el (gdb-init-1): Check also for tty on a remote host.
author Michael Albinus <michael.albinus@gmx.de>
date Thu, 29 Jul 2010 15:13:11 +0200
parents d9250f687548
children 93141d34a175
line wrap: on
line diff
--- a/lisp/progmodes/gdb-mi.el	Thu Jul 29 08:59:29 2010 +0200
+++ b/lisp/progmodes/gdb-mi.el	Thu Jul 29 15:13:11 2010 +0200
@@ -795,7 +795,10 @@
   (gdb-input
    ;; Needs GDB 6.4 onwards
    (list (concat "-inferior-tty-set "
-		 (process-tty-name (get-process "gdb-inferior")))
+		 (or
+		  ;; The process can run on a remote host.
+		  (process-get (get-process "gdb-inferior") 'remote-tty)
+		  (process-tty-name (get-process "gdb-inferior"))))
 	 'ignore))
   (if (eq window-system 'w32)
       (gdb-input (list "-gdb-set new-console off" 'ignore)))