Browse Source

removed trailing spaces

Oleg Zinchenko 10 years ago
parent
commit
f8f0966a82
5 changed files with 9 additions and 9 deletions
  1. 3 3
      src/kvs.erl
  2. 2 2
      src/kvs_acl.erl
  3. 1 1
      src/kvs_feed.erl
  4. 2 2
      src/kvs_user.erl
  5. 1 1
      src/store_redis.erl

+ 3 - 3
src/kvs.erl

@@ -89,7 +89,7 @@ add(Record) when is_tuple(Record) ->
                     Next = undefined,
                     Next = undefined,
                     Prev = case element(#container.top, Container) of
                     Prev = case element(#container.top, Container) of
                         undefined -> undefined;
                         undefined -> undefined;
-                        Tid -> 
+                        Tid ->
                             case kvs:get(Type, Tid) of
                             case kvs:get(Type, Tid) of
                             {error, not_found} -> undefined;
                             {error, not_found} -> undefined;
                             {ok, Top} ->
                             {ok, Top} ->
@@ -199,7 +199,7 @@ traversal(RecordType2, Start, Count, Direction)->
     {ok, R} ->  Prev = element(Direction, R),
     {ok, R} ->  Prev = element(Direction, R),
                 Count1 = case Count of C when is_integer(C) -> C - 1; _-> Count end,
                 Count1 = case Count of C when is_integer(C) -> C - 1; _-> Count end,
                 [R | traversal(RecordType2, Prev, Count1, Direction)];
                 [R | traversal(RecordType2, Prev, Count1, Direction)];
-    Error -> 
+    Error ->
      io:format("Error: ~p~n",[Error]),
      io:format("Error: ~p~n",[Error]),
       [] end.
       [] end.
 
 
@@ -231,7 +231,7 @@ table_type(A) -> A.
 range(RecordName,Id) -> Ranges = kvs:config(RecordName), find(Ranges,RecordName,Id).
 range(RecordName,Id) -> Ranges = kvs:config(RecordName), find(Ranges,RecordName,Id).
 
 
 find([],_,Id) -> [];
 find([],_,Id) -> [];
-find([Range|T],RecordName,Id) -> 
+find([Range|T],RecordName,Id) ->
      case lookup(Range,Id) of
      case lookup(Range,Id) of
           [] -> find(T,RecordName,Id);
           [] -> find(T,RecordName,Id);
           Name -> Name end.
           Name -> Name end.

+ 2 - 2
src/kvs_acl.erl

@@ -8,13 +8,13 @@
 -include("group.hrl").
 -include("group.hrl").
 -include("feed.hrl").
 -include("feed.hrl").
 
 
-metainfo() -> 
+metainfo() ->
     #schema{name=kvs,tables=[
     #schema{name=kvs,tables=[
         #table{name=acl,container=true,fields=record_info(fields,acl),keys=[id,accessor]},
         #table{name=acl,container=true,fields=record_info(fields,acl),keys=[id,accessor]},
         #table{name=access,container=acl,fields=record_info(fields,access)}
         #table{name=access,container=acl,fields=record_info(fields,access)}
     ]}.
     ]}.
 
 
-define_access(Accessor, Resource, Action) -> 
+define_access(Accessor, Resource, Action) ->
     Entry = #access{ id={Accessor, Resource}, accessor=Accessor, action=Action},
     Entry = #access{ id={Accessor, Resource}, accessor=Accessor, action=Action},
     case kvs:add(Entry) of
     case kvs:add(Entry) of
         {error, exist} -> kvs:put(Entry#access{action=Action});
         {error, exist} -> kvs:put(Entry#access{action=Action});

+ 1 - 1
src/kvs_feed.erl

@@ -8,7 +8,7 @@
 -include("metainfo.hrl").
 -include("metainfo.hrl").
 -include("state.hrl").
 -include("state.hrl").
 
 
-metainfo() -> 
+metainfo() ->
     #schema{name=kvs,tables=[
     #schema{name=kvs,tables=[
         #table{name=entry,container=true,fields=record_info(fields,entry)},
         #table{name=entry,container=true,fields=record_info(fields,entry)},
         #table{name=comment,container=true,fields=record_info(fields,comment)},
         #table{name=comment,container=true,fields=record_info(fields,comment)},

+ 2 - 2
src/kvs_user.erl

@@ -6,7 +6,7 @@
 -include("metainfo.hrl").
 -include("metainfo.hrl").
 -compile(export_all).
 -compile(export_all).
 
 
-metainfo() -> 
+metainfo() ->
     #schema{name=kvs,tables=[
     #schema{name=kvs,tables=[
         #table{name=user2,container=feed,fields=record_info(fields,user2)},
         #table{name=user2,container=feed,fields=record_info(fields,user2)},
         #table{name=user,container=feed,fields=record_info(fields,user),
         #table{name=user,container=feed,fields=record_info(fields,user),
@@ -21,6 +21,6 @@ handle_notice([kvs_user, user, Owner, delete], [#user{}=U], #state{owner=Owner}=
     kvs:info(?MODULE,"[kvs_user] delete user: ~p", [U]),
     kvs:info(?MODULE,"[kvs_user] delete user: ~p", [U]),
     {noreply, State};
     {noreply, State};
 
 
-handle_notice(_Route, _Message, State) -> 
+handle_notice(_Route, _Message, State) ->
     kvs:info(?MODULE,"[kvs_user] unknown notice."),
     kvs:info(?MODULE,"[kvs_user] unknown notice."),
     {noreply, State}.
     {noreply, State}.

+ 1 - 1
src/store_redis.erl

@@ -63,7 +63,7 @@ delete(RecordName,Key) ->
         {ok,<<"1">>} -> ok;
         {ok,<<"1">>} -> ok;
         E -> {error, E} end.
         E -> {error, E} end.
 count(RecordName) -> length(redis_keys(RecordName)).
 count(RecordName) -> length(redis_keys(RecordName)).
-all(RecordName) -> 
+all(RecordName) ->
     Keys = redis_keys(RecordName),
     Keys = redis_keys(RecordName),
     List = redis_transaction(fun() -> [redis_get(Key) || Key <- Keys] end),
     List = redis_transaction(fun() -> [redis_get(Key) || Key <- Keys] end),
     case RecordName of
     case RecordName of