anchor.diff:      case string:to_integer(wrq:path_info(id, Req)) of
           {error, _Reason} ->
               {true, Req, State};
  -        {_Int, []} ->
  -            {false, Req, State};
  +        {Id, []} ->
  +            {false, Req, State#state{document_id = Id}};
           {_Int, _Rest} ->
               {true, Req, State}
       end;
  
positive.code:         end
        , fun () ->
                  meck:expect(wrq, path_info, 2, "23"),
                  {false, _, _} =
                      malformed_request(req, #state{ mode = document
                                                   , path_info = id
                                                   }
                                       ),
                  ok
          end
        ]
  
negative.code:     Id =
          case PathInfo of
              id ->
                  State#state.document_id;
              path ->
                  {ok, Result} = path_to_id(wrq:path_info(path, Req), Context),
                  Result
  