anchor.diff:  %% @end
   %%------------------------------------------------------------------------------
   -spec create_node(Credentials        :: credentials(),
  -                      NodeName           :: string() | binary(),
  -                      SizeId             :: string() | binary(),
  -                      ImageId            :: string() | binary(),
  -                      KeyName            :: string() | binary(),
  -                      SecurityGroupNames :: [string() | binary()]) ->
  +                  NodeName           :: string() | binary(),
  +                  SizeId             :: string() | binary(),
  +                  ImageId            :: string() | binary(),
  +                  KeyName            :: string() | binary(),
  +                  SecurityGroupNames :: [string() | binary()]) ->
             elibcloud_func_result(no_such_size |
                                   no_such_image |
                                   no_such_key |
                                   no_such_group).
  -create_node({Provider, UserName, Password}, NodeName, SizeId, ImageId,
  -                KeyName, SecurityGroupNames) ->
  +create_node({Provider, UserName, Password}, NodeName, SizeId, ImageId, KeyName,
  +            SecurityGroupNames) ->
   
       lager:debug("Create node (NodeName=~p)", [NodeName]),
       JsonInput = [{<<"action">>,             <<"create_node">>},
  
positive.code:           elibcloud_func_result(no_predefined_error).
  list_nodes({Provider, UserName, Password}) ->
  
      JsonInput = [{<<"action">>,     <<"list_nodes">>},
                   {<<"provider">>,   bin(Provider)},
                   {<<"userName">>,   bin(UserName)},
                   {<<"password">>,   bin(Password)}],
  
      case libcloud_wrapper(JsonInput) of
          {ok, JsonRes} ->
  
negative.code:                       KeyName     :: string() | binary()) ->
            elibcloud_func_result(no_such_key).
  delete_key_pair({Provider, UserName, Password}, KeyName) ->
      JsonInput = [{<<"action">>,   <<"delete_key_pair">>},
                   {<<"provider">>, bin(Provider)},
                   {<<"userName">>, bin(UserName)},
                   {<<"password">>, bin(Password)},
                   {<<"keyName">>,  bin(KeyName)}],
  
      case libcloud_wrapper(JsonInput) of
          {ok, JsonRes} ->
  