From ac8cf6e698c4612dc3ed195dbf1348db67f59fe5 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Wed, 10 Aug 2011 21:29:31 +0300 Subject: [PATCH] * lisp/progmodes/grep.el (rgrep): Don't bind `process-connection-type'. This finishes incomplete reversion of 2011-06-30T01:09:13Z!larsi@gnus.org (2011-06-30) intended by 2011-07-06T15:49:19Z!larsi@gnus.org (2011-07-06). --- lisp/ChangeLog | 6 ++++++ lisp/progmodes/grep.el | 3 +-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 66874bdb29a..780ea61a7ac 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2011-08-10 Juri Linkov + + * progmodes/grep.el (rgrep): Don't bind `process-connection-type'. + This finishes incomplete reversion of 2011-06-30T01:09:13Z!larsi@gnus.org + intended by 2011-07-06T15:49:19Z!larsi@gnus.org. + 2011-08-09 Chong Yidong * hi-lock.el (hi-lock-unface-buffer): Fix interactive spec diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el index 5561575ea20..db8e82193b3 100644 --- a/lisp/progmodes/grep.el +++ b/lisp/progmodes/grep.el @@ -1023,8 +1023,7 @@ This command shares argument histories with \\[lgrep] and \\[grep-find]." (read-from-minibuffer "Confirm: " command nil nil 'grep-find-history)) (add-to-history 'grep-find-history command)) - (let ((default-directory dir) - (process-connection-type nil)) + (let ((default-directory dir)) (compilation-start command 'grep-mode)) ;; Set default-directory if we started rgrep in the *grep* buffer. (if (eq next-error-last-buffer (current-buffer)) -- 2.39.2