changeset 88102:0fa30755c209

(grep-compute-defaults): Don't mix up defaults for different connections to the same host.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 01 Feb 2008 01:38:32 +0000
parents 5297ed06b207
children d6247c939edc
files lisp/ChangeLog lisp/progmodes/grep.el
diffstat 2 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Fri Feb 01 01:18:05 2008 +0000
+++ b/lisp/ChangeLog	Fri Feb 01 01:38:32 2008 +0000
@@ -1,3 +1,8 @@
+2008-02-01  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* progmodes/grep.el (grep-compute-defaults):
+	Don't mix up defaults for different connections to the same host.
+
 2008-01-31  Vinicius Jose Latorre  <viniciusjl@ig.com.br>
 
 	* blank-mode.el: Renamed to whitespace.el.
--- a/lisp/progmodes/grep.el	Fri Feb 01 01:18:05 2008 +0000
+++ b/lisp/progmodes/grep.el	Fri Feb 01 01:38:32 2008 +0000
@@ -408,7 +408,7 @@
 	     (grep-find-use-xargs ,grep-find-use-xargs)
 	     (grep-highlight-matches ,grep-highlight-matches)))))
   (let* ((host-id
-	  (intern (or (file-remote-p default-directory 'host) "localhost")))
+	  (intern (or (file-remote-p default-directory) "localhost")))
 	 (host-defaults (assq host-id grep-host-defaults-alist))
 	 (defaults (assq nil grep-host-defaults-alist)))
     ;; There are different defaults on different hosts.  They must be