umgeher/cowboy
0
Fork 0
mirror of https://github.com/ninenines/cowboy.git synced 2025-07-14 20:30:23 +00:00
Code Issues Wiki Activity

Squash me, probably needs to use Tabs and NOT spaces

Browse source
This commit is contained in:
ruanpienaar 2018-11-07 23:43:43 +00:00
parent 0940e725a0
commit 4c796d9aab
1 changed files with 6 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

12
examples/file_server/src/directory_h.erl
View file

@ -42,12 +42,12 @@ list_html(Req, {Path, Fs}) ->
{HTML, Req, Path}. {HTML, Req, Path}.
links(<<>>, "..") -> links(<<>>, "..") ->
["<a href='/", "..", "'>", "..", "</a><br>\n"]; ["<a href='/", "..", "'>", "..", "</a><br>\n"];
links(Prefix, "..") -> links(Prefix, "..") ->
Toks = string:tokens(binary_to_list(Prefix), "/"), Toks = string:tokens(binary_to_list(Prefix), "/"),
Back = lists:join( "/", lists:delete(lists:last(Toks), Toks)), Back = lists:join( "/", lists:delete(lists:last(Toks), Toks)),
["<a href='/", "..", $/ ] ++ Back ++ [ "'>", "..", "</a><br>\n"]; ["<a href='/", "..", $/ ] ++ Back ++ [ "'>", "..", "</a><br>\n"];
links(<<>>, File) -> links(<<>>, File) ->
["<a href='/", File, "'>", File, "</a><br>\n"]; ["<a href='/", File, "'>", File, "</a><br>\n"];
links(Prefix, File) -> links(Prefix, File) ->
["<a href='/", Prefix, File, "'>", File, "</a><br>\n"]. ["<a href='/", Prefix, File, "'>", File, "</a><br>\n"].