X-Git-Url: http://git.rot13.org/?p=angular-mojolicious.git;a=blobdiff_plain;f=angular-server.pl;h=221f60d2a7f9742a08215aa919a1e40e90ec91af;hp=294af13a0ea100220b0d17c09137f66c194d93c7;hb=90f291c35c97806ca486eb7f541480e4357b3159;hpb=ec54ccc6ef3015369a7d36d7c6e2c4a0961706a0 diff --git a/angular-server.pl b/angular-server.pl index 294af13..221f60d 100755 --- a/angular-server.pl +++ b/angular-server.pl @@ -123,7 +123,17 @@ get '/data/:database' => sub { get '/data/:database/:entity' => sub { my $self = shift; - _render_jsonp( $self, _couchdb_get( '/' . $self->param('database') . '/_all_docs' ) ); # FIXME + + my $database = $self->param('database'); + my $entity = $self->param('entity'); + + my $endkey = $entity; + $endkey++; + + my $counts = _couchdb_get qq|/$database/_all_docs?startkey="$entity";endkey="$endkey";include_docs=true|; + warn "# counts ",dump($counts); + + _render_jsonp( $self, [ map { $_->{doc} } @{ $counts->{rows} } ] ) }; get '/data/:database/:entity/:id' => sub {