Useless use of hd/1

msantos · Jul 1, 2010 · fcb3fca · fcb3fca
1 parent c6aeb0c
commit fcb3fca
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/spood.erl b/src/spood.erl
@@ -59,7 +59,7 @@ nameserver(NS) ->
 
 device(undefined) ->
     {ok, S} = procket:listen(0, [{protocol, udp}, {family, inet}, {type, dgram}]),
-    Dev = hd([ If || If <- packet:iflist(), ipcheck(S, If) ]),
+    [Dev|_] = [ If || If <- packet:iflist(), ipcheck(S, If) ],
     procket:close(S),
     Dev;
 device(Dev) ->