From 55ec6b379a5e68cad310b677d7f96df6cd51969d Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 29 Mar 2005 15:30:39 +0000 Subject: [PATCH] (vc-do-command): Use a pipe for async processes, so password prompts don't show up at places where the user can't reply. --- lisp/ChangeLog | 5 +++++ lisp/vc.el | 8 +++++--- 2 files changed, 10 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a656b62248c..7ef89d4ce56 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-03-29 Stefan Monnier + + * vc.el (vc-do-command): Use a pipe for async processes, so password + prompts don't show up at places where the user can't reply. + 2005-03-29 Olive Lin * textmodes/tex-mode.el (tex-send-command): shell-quote-argument diff --git a/lisp/vc.el b/lisp/vc.el index 2e241e67f48..ce4cb2d36c8 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -1,7 +1,7 @@ ;;; vc.el --- drive a version-control system from within Emacs ;; Copyright (C) 1992, 1993, 1994, 1995, 1996, 1997, 1998, -;; 2000, 2001, 2003, 2004 Free Software Foundation, Inc. +;; 2000, 2001, 2003, 2004, 2005 Free Software Foundation, Inc. ;; Author: FSF (see below for full credits) ;; Maintainer: Andre Spiegel @@ -962,8 +962,10 @@ that is inserted into the command line before the filename." ;; start-process does not support remote execution (setq okstatus nil)) (if (eq okstatus 'async) - (let ((proc (apply 'start-process command (current-buffer) command - squeezed))) + (let ((proc + (let ((process-connection-type nil)) + (apply 'start-process command (current-buffer) command + squeezed)))) (unless (active-minibuffer-window) (message "Running %s in the background..." command)) ;;(set-process-sentinel proc (lambda (p msg) (delete-process p)))