aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love1998-08-27 09:26:08 +0000
committerDave Love1998-08-27 09:26:08 +0000
commit3f235494af33d1371b682ccf9d94a7a922e45d41 (patch)
tree8ad74bf062b612539d9686fd71ecd80794588ed2
parent5134d850aa743a5fd2c2162b5278a56ddca1dc5b (diff)
downloademacs-3f235494af33d1371b682ccf9d94a7a922e45d41.tar.gz
emacs-3f235494af33d1371b682ccf9d94a7a922e45d41.zip
Reinstate checking
dired-local-variables-file for dired-x.
-rw-r--r--lisp/ange-ftp.el9
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el
index 71551fb85f7..5047047ffec 100644
--- a/lisp/ange-ftp.el
+++ b/lisp/ange-ftp.el
@@ -2802,11 +2802,10 @@ NO-ERROR, if a listing for DIRECTORY cannot be obtained."
2802 (host-type (ange-ftp-host-type 2802 (host-type (ange-ftp-host-type
2803 (car parsed)))) 2803 (car parsed))))
2804 (or 2804 (or
2805;;; This variable seems not to exist in Emacs 19 -- rms. 2805 ;; Deal with dired
2806;;; ;; Deal with dired 2806 (and (boundp 'dired-local-variables-file) ; in the dired-x package
2807;;; (and (boundp 'dired-local-variables-file) 2807 (stringp dired-local-variables-file)
2808;;; (stringp dired-local-variables-file) 2808 (string-equal dired-local-variables-file efile))
2809;;; (string-equal dired-local-variables-file efile))
2810 ;; No dots in dir names in vms. 2809 ;; No dots in dir names in vms.
2811 (and (eq host-type 'vms) 2810 (and (eq host-type 'vms)
2812 (string-match "\\." efile)) 2811 (string-match "\\." efile))