~ubuntu-branches/debian/squeeze/erlang/squeeze

« back to all changes in this revision

Viewing changes to lib/ssl/src/inet_ssl_dist.erl

  • Committer: Bazaar Package Importer
  • Author(s): Erlang Packagers, Sergei Golovan
  • Date: 2006-12-03 17:07:44 UTC
  • mfrom: (2.1.11 feisty)
  • Revision ID: james.westby@ubuntu.com-20061203170744-rghjwupacqlzs6kv
Tags: 1:11.b.2-4
[ Sergei Golovan ]
Fixed erlang-base and erlang-base-hipe prerm scripts.

Show diffs side-by-side

added added

removed removed

Lines of Context:
67
67
 
68
68
select(Node) ->
69
69
    case split_node(atom_to_list(Node), $@, []) of
70
 
        [_, Host] ->
71
 
            case inet:getaddr(Host,inet) of
72
 
                {ok,_} -> true;
73
 
                _ -> false
74
 
            end;
 
70
        [_,_Host] -> true;
75
71
        _ -> false
76
72
    end.
77
73