Make "title" filter more Django-y

src/erlydtl_filters.erl

@@ -1029,7 +1029,8 @@ title([], Acc) ->
     lists:reverse(Acc);
 title([Char | Rest], [] = Acc) when Char >= $a, Char =< $z ->
     title(Rest, [Char + ($A - $a) | Acc]);
-title([Char | Rest], [$\  |_] = Acc) when Char >= $a, Char =< $z ->
+title([Char | Rest], [Sep|_] = Acc) when Char >= $a, Char =< $z, not (Sep >= $a andalso Sep =< $z),
+                                         not (Sep >= $A andalso Sep =< $Z) ->
     title(Rest, [Char + ($A - $a) | Acc]);
 title([Char | Rest], Acc) ->
     title(Rest, [Char | Acc]).

tests/src/erlydtl_unittests.erl

@@ -823,6 +823,9 @@ tests() ->
                 {"|title (pre-formatted)",
                     <<"{{ \"My Title Case\"|title }}">>, [],
                     <<"My Title Case">>},
+                {"|title (wacky separators)",
+                    <<"{{ \"my-title!case\"|title }}">>, [],
+                    <<"My-Title!Case">>},
                 {"|truncatechars:0",
                     <<"{{ var1|truncatechars:0 }}">>, [{var1, "Empty Me"}],
                     <<"">>},