Mercurial > emacs
comparison lisp/net/ange-ftp.el @ 45498:9eb17953a0f7
(read-file-name-internal): Remove the `ange-ftp' property.
(ange-ftp-real-read-file-name-internal): Remove.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Fri, 24 May 2002 22:01:56 +0000 |
parents | d9e7dc0ccc84 |
children | 2505f1f45d68 |
comparison
equal
deleted
inserted
replaced
45497:599066f40ebe | 45498:9eb17953a0f7 |
---|---|
4389 (put 'file-writable-p 'ange-ftp 'ange-ftp-file-writable-p) | 4389 (put 'file-writable-p 'ange-ftp 'ange-ftp-file-writable-p) |
4390 (put 'file-readable-p 'ange-ftp 'ange-ftp-file-readable-p) | 4390 (put 'file-readable-p 'ange-ftp 'ange-ftp-file-readable-p) |
4391 (put 'file-executable-p 'ange-ftp 'ange-ftp-file-executable-p) | 4391 (put 'file-executable-p 'ange-ftp 'ange-ftp-file-executable-p) |
4392 (put 'file-symlink-p 'ange-ftp 'ange-ftp-file-symlink-p) | 4392 (put 'file-symlink-p 'ange-ftp 'ange-ftp-file-symlink-p) |
4393 (put 'delete-file 'ange-ftp 'ange-ftp-delete-file) | 4393 (put 'delete-file 'ange-ftp 'ange-ftp-delete-file) |
4394 (put 'read-file-name-internal 'ange-ftp 'ange-ftp-read-file-name-internal) | |
4395 (put 'verify-visited-file-modtime 'ange-ftp | 4394 (put 'verify-visited-file-modtime 'ange-ftp |
4396 'ange-ftp-verify-visited-file-modtime) | 4395 'ange-ftp-verify-visited-file-modtime) |
4397 (put 'file-exists-p 'ange-ftp 'ange-ftp-file-exists-p) | 4396 (put 'file-exists-p 'ange-ftp 'ange-ftp-file-exists-p) |
4398 (put 'write-region 'ange-ftp 'ange-ftp-write-region) | 4397 (put 'write-region 'ange-ftp 'ange-ftp-write-region) |
4399 (put 'backup-buffer 'ange-ftp 'ange-ftp-backup-buffer) | 4398 (put 'backup-buffer 'ange-ftp 'ange-ftp-backup-buffer) |
4464 (ange-ftp-run-real-handler 'file-executable-p args)) | 4463 (ange-ftp-run-real-handler 'file-executable-p args)) |
4465 (defun ange-ftp-real-file-symlink-p (&rest args) | 4464 (defun ange-ftp-real-file-symlink-p (&rest args) |
4466 (ange-ftp-run-real-handler 'file-symlink-p args)) | 4465 (ange-ftp-run-real-handler 'file-symlink-p args)) |
4467 (defun ange-ftp-real-delete-file (&rest args) | 4466 (defun ange-ftp-real-delete-file (&rest args) |
4468 (ange-ftp-run-real-handler 'delete-file args)) | 4467 (ange-ftp-run-real-handler 'delete-file args)) |
4469 (defun ange-ftp-real-read-file-name-internal (&rest args) | |
4470 (ange-ftp-run-real-handler 'read-file-name-internal args)) | |
4471 (defun ange-ftp-real-verify-visited-file-modtime (&rest args) | 4468 (defun ange-ftp-real-verify-visited-file-modtime (&rest args) |
4472 (ange-ftp-run-real-handler 'verify-visited-file-modtime args)) | 4469 (ange-ftp-run-real-handler 'verify-visited-file-modtime args)) |
4473 (defun ange-ftp-real-file-exists-p (&rest args) | 4470 (defun ange-ftp-real-file-exists-p (&rest args) |
4474 (ange-ftp-run-real-handler 'file-exists-p args)) | 4471 (ange-ftp-run-real-handler 'file-exists-p args)) |
4475 (defun ange-ftp-real-write-region (&rest args) | 4472 (defun ange-ftp-real-write-region (&rest args) |