From b8afa6a07d97bf81cdae3c69d80dd8c0969fe931 Mon Sep 17 00:00:00 2001 From: b Date: Tue, 7 Jun 2011 16:34:19 -0700 Subject: [PATCH] A more readable version of trailing slash stripping --- src/webmachine_decision_core.erl | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/src/webmachine_decision_core.erl b/src/webmachine_decision_core.erl index 54bc9797..e12d687e 100644 --- a/src/webmachine_decision_core.erl +++ b/src/webmachine_decision_core.erl @@ -432,9 +432,8 @@ decision(v3n11) -> BaseUri = case resource_call(base_uri) of undefined -> wrcall(base_uri); Any -> - case lists:last(Any) of - % 47 is "/" - 47 -> lists:sublist(Any, erlang:length(Any) - 1); + case [lists:last(Any)] of + "/" -> lists:sublist(Any, erlang:length(Any) - 1); _ -> Any end end,