mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-25 07:28:20 +00:00
(vc-do-command): Use a pipe for async processes, so password
prompts don't show up at places where the user can't reply.
This commit is contained in:
parent
6380e5a709
commit
55ec6b379a
@ -1,3 +1,8 @@
|
||||
2005-03-29 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* 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 <olive.lin@versateladsl.be>
|
||||
|
||||
* textmodes/tex-mode.el (tex-send-command): shell-quote-argument
|
||||
|
@ -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 <spiegel@gnu.org>
|
||||
@ -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)))
|
||||
|
Loading…
Reference in New Issue
Block a user