Permalink
Browse files

unsupported scheme removed

  • Loading branch information...
1 parent 5e790e6 commit fedfa17f83aa5bcc7cae0792de27f9c4ff6317da @ivkosh committed Feb 22, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/rdbl.erl
View
2 src/rdbl.erl
@@ -544,7 +544,7 @@ full_url({_Root, _Context}, ComponentUrl="https://"++_) -> ComponentUrl;
full_url({_Root, _Context}, ComponentUrl="ftp://"++_) -> ComponentUrl;
full_url({Root, Context}, ComponentUrl) -> Root ++ Context ++ "/" ++ ComponentUrl. % everything else is a relative path
+% TODO: add case insesitive checking
add_proto_if_none(U="http://"++_) -> U;
add_proto_if_none(U="https://"++_) -> U;
-add_proto_if_none(U="ftp://"++_) -> U;
add_proto_if_none(U) -> "http://"++U.

0 comments on commit fedfa17

Please sign in to comment.