by-access-id: handle descending=true

1 files changed, 16 insertions, 3 deletions

diff --git a/src/couch_mrview/src/couch_mrview.erl b/src/couch_mrview/src/couch_mrview.erl
index 0ce46950d..697ec786e 100644
--- a/src/couch_mrview/src/couch_mrview.erl
+++ b/src/couch_mrview/src/couch_mrview.erl
@@ -243,11 +243,12 @@ query_all_docs_access(Db, Args0, Callback, Acc) ->
     UserName = UserCtx#user_ctx.name,
     couch_log:info("~n~n UserName:~p~n~n", [UserName]),
     % TODO: add roles
-    Args = prefix_startkey_endkey(UserName, Args0),
+    Args = prefix_startkey_endkey(UserName, Args0, Args0#mrargs.direction),
     query_view(Db, DDoc, VName, Args, Callback, Acc).
 
-prefix_startkey_endkey(UserName, #mrargs{start_key=StartKey, end_key=EndKey} = Args0) ->
-    Args0#mrargs {
+prefix_startkey_endkey(UserName, Args, fwd) ->
+    #mrargs{start_key=StartKey, end_key=EndKey} = Args,
+    Args#mrargs {
         start_key = case StartKey of
             undefined -> [UserName];
             StartKey -> [UserName, StartKey]
@@ -256,6 +257,18 @@ prefix_startkey_endkey(UserName, #mrargs{start_key=StartKey, end_key=EndKey} = A
             undefined -> [UserName, {}];
             EndKey -> [UserName, EndKey, {}]
         end
+    };
+prefix_startkey_endkey(UserName, Args, rev) ->
+    #mrargs{start_key=StartKey, end_key=EndKey} = Args,
+    Args#mrargs {
+        end_key = case StartKey of
+            undefined -> [UserName];
+            StartKey -> [UserName, StartKey]
+        end,
+        start_key = case EndKey of
+            undefined -> [UserName, {}];
+            EndKey -> [UserName, EndKey, {}]
+        end
     }.
 
 query_all_docs_admin(Db, Args0, Callback, Acc) ->