diff options
| author | Dave Love | 1998-08-27 09:26:08 +0000 |
|---|---|---|
| committer | Dave Love | 1998-08-27 09:26:08 +0000 |
| commit | 3f235494af33d1371b682ccf9d94a7a922e45d41 (patch) | |
| tree | 8ad74bf062b612539d9686fd71ecd80794588ed2 | |
| parent | 5134d850aa743a5fd2c2162b5278a56ddca1dc5b (diff) | |
| download | emacs-3f235494af33d1371b682ccf9d94a7a922e45d41.tar.gz emacs-3f235494af33d1371b682ccf9d94a7a922e45d41.zip | |
Reinstate checking
dired-local-variables-file for dired-x.
| -rw-r--r-- | lisp/ange-ftp.el | 9 |
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)) |