X-Git-Url: http://git.rot13.org/?p=angular-mojolicious.git;a=blobdiff_plain;f=angular-server.pl;h=57e40a475957de8dc64029e6d2de748b92f8d4f2;hp=0ac454413f42367b4134048ed669d1b75a4c3b1d;hb=c1445b894066b55d757ba690d31b88b0f905586e;hpb=2137d2680d5cd2d8ed400e3120406ad146028210 diff --git a/angular-server.pl b/angular-server.pl index 0ac4544..57e40a4 100755 --- a/angular-server.pl +++ b/angular-server.pl @@ -222,7 +222,9 @@ get '/json/:database/:entity' => sub { local $/ = undef; my $str = <$fh>; warn "# $path $str"; - push @$docs, Mojo::JSON->new->decode( $str ); + my $data = Mojo::JSON->new->decode( $str ); + $data->{_key} = $1 if $path =~ m{/([^/]+$)}; + push @$docs, $data; } _render_jsonp( $self, $docs )