Remove trailing dash

msantos · Nov 2, 2010 · daa2509 · daa2509
1 parent 8fa9e86
commit daa2509
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 3 deletions.
diff --git a/seds/src/seds.erl b/seds/src/seds.erl
@@ -44,7 +44,7 @@
 -record(state, {
         acf = false,                    % allow client forwarding
         acl = [],                       % forward IP blacklist
-        acl_port = [],                 % allowed ports (whitelist)
+        acl_port = [],                  % allowed ports (whitelist)
 
         f,                              % forwarders map
         s,                              % socket

diff --git a/seds/src/seds_protocol.erl b/seds/src/seds_protocol.erl
@@ -217,5 +217,4 @@ check_port(Port, Allowed) ->
 
 % Remove the trailing dash and convert to an integer
 list_to_sum(N) when is_list(N) ->
-    list_to_integer(lists:reverse(tl(lists:reverse(N)))).
+    list_to_integer(string:strip(N, right, $-)).
-