diff options
| author | Karl Heuer | 1996-01-04 23:34:36 +0000 |
|---|---|---|
| committer | Karl Heuer | 1996-01-04 23:34:36 +0000 |
| commit | 757bd20c31c3becdc2872c45e3632af603aa6703 (patch) | |
| tree | 992ea770c219d03084fad453589049c7c5580753 | |
| parent | 896b732936e48e2438e9b5f49082af91ddbed554 (diff) | |
| download | emacs-757bd20c31c3becdc2872c45e3632af603aa6703.tar.gz emacs-757bd20c31c3becdc2872c45e3632af603aa6703.zip | |
(ffap-list-env): Doc fix.
| -rw-r--r-- | lisp/ffap.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/ffap.el b/lisp/ffap.el index 0878e511e0f..dcd9fe718dc 100644 --- a/lisp/ffap.el +++ b/lisp/ffap.el | |||
| @@ -564,7 +564,7 @@ A string means the machine exists, but does not respond for some reason." | |||
| 564 | ;; (ffap-file-remote-p "/foo.dom://path") | 564 | ;; (ffap-file-remote-p "/foo.dom://path") |
| 565 | (or (and ffap-ftp-regexp | 565 | (or (and ffap-ftp-regexp |
| 566 | (string-match ffap-ftp-regexp filename) | 566 | (string-match ffap-ftp-regexp filename) |
| 567 | ;; Convert "/host://path" to "/host:/path", to handle a dieing | 567 | ;; Convert "/host://path" to "/host:/path", to handle a dying |
| 568 | ;; practice of advertising ftp paths as "host.dom://path". | 568 | ;; practice of advertising ftp paths as "host.dom://path". |
| 569 | (if (string-match "//" filename) | 569 | (if (string-match "//" filename) |
| 570 | (concat (substring filename 0 (match-beginning 0)) | 570 | (concat (substring filename 0 (match-beginning 0)) |
| @@ -677,7 +677,7 @@ Variable `ffap-ftp-default-user' overrides or suppresses \"anonymous\"." | |||
| 677 | 677 | ||
| 678 | (defun ffap-list-env (env &optional empty) | 678 | (defun ffap-list-env (env &optional empty) |
| 679 | ;; Replace this with parse-colon-path (lisp/files.el)? | 679 | ;; Replace this with parse-colon-path (lisp/files.el)? |
| 680 | "Directory list parsed from \":\"-separated ENVinronment variable. | 680 | "Directory list parsed from \":\"-separated ENVironment variable. |
| 681 | Optional EMPTY is default if (getenv ENV) is undefined, and is also | 681 | Optional EMPTY is default if (getenv ENV) is undefined, and is also |
| 682 | substituted for the first empty-string component, if there is one." | 682 | substituted for the first empty-string component, if there is one." |
| 683 | ;; Derived from psg-list-env in RHOGEE's ff-paths and | 683 | ;; Derived from psg-list-env in RHOGEE's ff-paths and |