projects
/
angular-mojolicious.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
cleanup layout and display all available info
[angular-mojolicious.git]
/
angular-server.pl
diff --git
a/angular-server.pl
b/angular-server.pl
index
0ac4544
..
57e40a4
100755
(executable)
--- 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";
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 )
}
_render_jsonp( $self, $docs )