changed design back into single controller page

[angular-mojolicious.git] / angular-server.pl

diff --git a/angular-server.pl b/angular-server.pl
index 0a6cd75..12e7cdb 100755 (executable)
--- a/angular-server.pl
+++ b/angular-server.pl
@@ -1,10 +1,14 @@
 #!/usr/bin/env perl
 
+use lib 'common/mojo/lib';
+
 use Mojolicious::Lite;
 use Data::Dump qw(dump);
-use Time::HiRes qw(time);
+use Time::HiRes;
 use Clone qw(clone);
 
+sub new_uuid { Time::HiRes::time * 100000 }
+
 # based on
 # http://docs.getangular.com/REST.Basic
 # http://angular.getangular.com/data
@@ -125,7 +129,7 @@ any [ 'post' ] => '/data/:database/:entity' => sub {
        my $json = $self->req->json;
        my $id = $json->{'$id'} # XXX we don't get it back from angular.js
                || $json->{'_id'}  # so we use our version
-               || Time::HiRes::time(); # FIXME UUID?
+               || new_uuid;
        warn "## $id body ",dump($self->req->body, $json);
        die "no data" unless $data;