Fixing error in oauth_for test

Additionally I noticed that the eunit assert comparison args should be
something like `_assertEqual(Expected, Value)` rather than the other way
around. It helps make the test messages clearer.

src/switchboard_oauth.erl

@@ -126,6 +126,7 @@ oauth_for({xoauth2, Account, {_, Provider}}) ->
 -spec oauth_for(provider | email, binary(), [proplists:property()]) ->
     {ok, {ClientID :: string, ClientSecret :: string}} | {error, _}.
 oauth_for(provider, Provider, Providers) ->
+    lager:warning("Providers: ~p", [Providers]),
     case proplists:get_value(Provider, Providers) of
       undefined ->
         {error, {no_provider_oauth, Provider}}; 
@@ -172,7 +173,7 @@ get_values([Key | Keys], List, Acc) ->
 -include_lib("eunit/include/eunit.hrl").
 
 get_values_test() ->
-    [?assertEqual(get_values(Keys, List), Expected)
+    [?assertEqual(Expected, get_values(Keys, List))
      || {Keys, List, Expected}
             <- [{[a], [{a, 1}, {b, 2}], {ok, [1]}},
                 {[b], [{a, 1}, {b, 2}], {ok, [2]}},
@@ -182,15 +183,15 @@ get_values_test() ->
                ]].
 
 to_query_string_test() ->
-  [?assertEqual(to_query_string(Props), Expected)
+  [?assertEqual(Expected, to_query_string(Props))
    || {Props, Expected}
       <- [
           { [{a, <<"1234">>}], <<"a=1234&">> },
           { [{a, <<"1234">>}, {b, <<"token">>}], <<"a=1234&b=token&">> }
          ]].
 
 oauth_for_test() ->
-    [?assertEqual(oauth_for(provider, Account, Providers), Expected)
+    [?assertEqual(Expected, oauth_for(email, Account, Providers))
      || {Account, Providers, Expected}
             <- [
                 {<<"[email protected]">>, [{google, prov}], {ok, prov}},