81 |
my $referer = $tx->req->content->headers->header('Referer'); |
my $referer = $tx->req->content->headers->header('Referer'); |
82 |
my $ajax = $tx->req->content->headers->header('X-Requested-With'); |
my $ajax = $tx->req->content->headers->header('X-Requested-With'); |
83 |
warn "# referer $referer\n"; |
warn "# referer $referer\n"; |
84 |
warn "# headers = ", dump( $tx->req->content->headers ); |
# warn "## headers = ", dump( $tx->req->content->headers ); |
85 |
|
|
86 |
if ( $referer =~ m{/_utils} || $ajax =~ m{XMLHttpRequest}i ) { |
if ( $referer =~ m{/_utils} || $ajax =~ m{XMLHttpRequest}i ) { |
87 |
return Frey::CouchAPI->dispatch( $tx ); |
return Frey::CouchAPI->dispatch( $tx ); |