Don't parse empty strings

2019-07-29 22:32:08 +02:00 · 2019-07-29 22:32:08 +02:00 · 62062e5dfb
commit 62062e5dfb
parent 45247dfa3f
1 changed files with 5 additions and 1 deletions
--- a/frontend/src/Parse.elm
+++ b/frontend/src/Parse.elm
@ -13,7 +13,11 @@ parseUrl url =
        |> Maybe.andThen splitOffHead
        |> Maybe.andThen
            (\( ( ( ( ( prov, user ), repo ), separator ), gitref ), file ) ->
-                if List.isEmpty file || (separator /= pathSeparator prov) then
+                if
+                    List.isEmpty file
+                        || (List.head file |> Maybe.map String.isEmpty |> Maybe.withDefault False)
+                        || (separator /= pathSeparator prov)
+                then
                    Nothing

                else