diff options
author | Richard Carlsson <[email protected]> | 2012-06-04 20:53:15 +0200 |
---|---|---|
committer | Fredrik Gustafsson <[email protected]> | 2012-08-08 10:01:45 +0200 |
commit | 4968de7826816b4a9eac94fd8776fe4b7454ca14 (patch) | |
tree | 06eec65c41f2941d74341d3ddd9166a1675b5913 | |
parent | 85a5f71087785c4eada6a4101ffeef6a15f5c409 (diff) | |
download | otp-4968de7826816b4a9eac94fd8776fe4b7454ca14.tar.gz otp-4968de7826816b4a9eac94fd8776fe4b7454ca14.tar.bz2 otp-4968de7826816b4a9eac94fd8776fe4b7454ca14.zip |
added special case for file names under Windows, thanks to Beads Land-Trujillo
-rw-r--r-- | lib/edoc/src/edoc_lib.erl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/edoc/src/edoc_lib.erl b/lib/edoc/src/edoc_lib.erl index 7fd8358add..90fb8a679c 100644 --- a/lib/edoc/src/edoc_lib.erl +++ b/lib/edoc/src/edoc_lib.erl @@ -469,6 +469,10 @@ uri_get("ftp:" ++ Path) -> uri_get("//" ++ Path) -> Msg = io_lib:format("cannot access network-path: '//~s'.", [Path]), {error, Msg}; +uri_get([C, $:, $/ | _]=Path) when C >= $A, C =< $Z; C >= $a, C =< $z -> + uri_get_file(Path); % special case for Windows +uri_get([C, $:, $\ | _]=Path) when C >= $A, C =< $Z; C >= $a, C =< $z -> + uri_get_file(Path); % special case for Windows uri_get(URI) -> case is_relative_uri(URI) of true -> |