Improve parsing logic
This commit is contained in:
parent
62062e5dfb
commit
b56eb1ba61
@ -14,8 +14,7 @@ parseUrl url =
|
|||||||
|> Maybe.andThen
|
|> Maybe.andThen
|
||||||
(\( ( ( ( ( prov, user ), repo ), separator ), gitref ), file ) ->
|
(\( ( ( ( ( prov, user ), repo ), separator ), gitref ), file ) ->
|
||||||
if
|
if
|
||||||
List.isEmpty file
|
(List.head file |> Maybe.map String.isEmpty |> Maybe.withDefault True)
|
||||||
|| (List.head file |> Maybe.map String.isEmpty |> Maybe.withDefault False)
|
|
||||||
|| (separator /= pathSeparator prov)
|
|| (separator /= pathSeparator prov)
|
||||||
then
|
then
|
||||||
Nothing
|
Nothing
|
||||||
|
Loading…
Reference in New Issue
Block a user