aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKarl Heuer1996-01-04 23:34:36 +0000
committerKarl Heuer1996-01-04 23:34:36 +0000
commit757bd20c31c3becdc2872c45e3632af603aa6703 (patch)
tree992ea770c219d03084fad453589049c7c5580753
parent896b732936e48e2438e9b5f49082af91ddbed554 (diff)
downloademacs-757bd20c31c3becdc2872c45e3632af603aa6703.tar.gz
emacs-757bd20c31c3becdc2872c45e3632af603aa6703.zip
(ffap-list-env): Doc fix.
-rw-r--r--lisp/ffap.el4
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.
681Optional EMPTY is default if (getenv ENV) is undefined, and is also 681Optional EMPTY is default if (getenv ENV) is undefined, and is also
682substituted for the first empty-string component, if there is one." 682substituted 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