aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLars Magne Ingebrigtsen2011-07-06 17:49:19 +0200
committerLars Magne Ingebrigtsen2011-07-06 17:49:19 +0200
commit12b167347fb77c981e0b0fb34bd2e7d6c5eeddf6 (patch)
tree99505870f4e41805740420cd05db97ff94e7f7b9
parent9e87df06a36582aba40079304f1ca63cce5d90b6 (diff)
downloademacs-12b167347fb77c981e0b0fb34bd2e7d6c5eeddf6.tar.gz
emacs-12b167347fb77c981e0b0fb34bd2e7d6c5eeddf6.zip
* progmodes/grep.el (rgrep): Don't bind `process-connection-type', because that makes the colours go away.
-rw-r--r--lisp/ChangeLog3
-rw-r--r--lisp/progmodes/grep.el3
2 files changed, 4 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 28309f913ca..e26ad08244f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
12011-07-06 Lars Magne Ingebrigtsen <larsi@gnus.org> 12011-07-06 Lars Magne Ingebrigtsen <larsi@gnus.org>
2 2
3 * progmodes/grep.el (rgrep): Don't bind `process-connection-type',
4 because that makes the colours go away.
5
3 * mail/sendmail.el (send-mail-function): Change the default to 6 * mail/sendmail.el (send-mail-function): Change the default to
4 `sendmail-query-once'. 7 `sendmail-query-once'.
5 (sendmail-query-once): Add an autoload cookie. 8 (sendmail-query-once): Add an autoload cookie.
diff --git a/lisp/progmodes/grep.el b/lisp/progmodes/grep.el
index d00189f15c3..5561575ea20 100644
--- a/lisp/progmodes/grep.el
+++ b/lisp/progmodes/grep.el
@@ -966,8 +966,7 @@ This command shares argument histories with \\[lgrep] and \\[grep-find]."
966 (setq dir default-directory)) 966 (setq dir default-directory))
967 (if (null files) 967 (if (null files)
968 (if (not (string= regexp grep-find-command)) 968 (if (not (string= regexp grep-find-command))
969 (let ((process-connection-type nil)) 969 (compilation-start regexp 'grep-mode))
970 (compilation-start regexp 'grep-mode)))
971 (setq dir (file-name-as-directory (expand-file-name dir))) 970 (setq dir (file-name-as-directory (expand-file-name dir)))
972 (require 'find-dired) ; for `find-name-arg' 971 (require 'find-dired) ; for `find-name-arg'
973 (let ((command (grep-expand-template 972 (let ((command (grep-expand-template