diff options
| author | Richard M. Stallman | 1998-07-22 00:31:24 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-07-22 00:31:24 +0000 |
| commit | 4b63ae47c25cfd2ff79fbe51a3efce9a41281817 (patch) | |
| tree | 953092efb2b639e45c8852f8dc95287a0aaf6610 | |
| parent | 59ee44271effbeca3f094a6bea50455e6c8214dc (diff) | |
| download | emacs-4b63ae47c25cfd2ff79fbe51a3efce9a41281817.tar.gz emacs-4b63ae47c25cfd2ff79fbe51a3efce9a41281817.zip | |
(ange-ftp-reread-dir): Renamed from `re-read'.
Old name defined as alias. Doc fix.
| -rw-r--r-- | lisp/ange-ftp.el | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el index 226ee04bb91..c5a8ecf4b0a 100644 --- a/lisp/ange-ftp.el +++ b/lisp/ange-ftp.el | |||
| @@ -3853,9 +3853,15 @@ system TYPE.") | |||
| 3853 | ;;(define-key minibuffer-local-completion-map "\C-r" 'ange-ftp-re-read-dir) | 3853 | ;;(define-key minibuffer-local-completion-map "\C-r" 'ange-ftp-re-read-dir) |
| 3854 | ;;(define-key minibuffer-local-must-match-map "\C-r" 'ange-ftp-re-read-dir) | 3854 | ;;(define-key minibuffer-local-must-match-map "\C-r" 'ange-ftp-re-read-dir) |
| 3855 | 3855 | ||
| 3856 | ;; Force a re-read of the directory DIR. If DIR is omitted then it defaults | 3856 | ;; The autoload cookie is to make sure the doc is always available. |
| 3857 | ;; to the directory part of the contents of the current buffer. | 3857 | ;;;###autoload (defalias 'ange-ftp-re-read-dir ange-ftp-reread-dir) |
| 3858 | (defun ange-ftp-re-read-dir (&optional dir) | 3858 | ;;;###autoload |
| 3859 | (defun ange-ftp-reread-dir (&optional dir) | ||
| 3860 | "Reread remote directory DIR to update the directory cache. | ||
| 3861 | The implementation of remote ftp file names caches directory contents | ||
| 3862 | for speed. Therefore, when new remote files are created, Emacs | ||
| 3863 | may not know they exist. You can use this command to reread a specific | ||
| 3864 | directory, so that Emacs will know its current contents." | ||
| 3859 | (interactive) | 3865 | (interactive) |
| 3860 | (if dir | 3866 | (if dir |
| 3861 | (setq dir (expand-file-name dir)) | 3867 | (setq dir (expand-file-name dir)) |