[Bps-public-commit] r17417 - in Prophet/trunk: .
sartak at bestpractical.com
sartak at bestpractical.com
Mon Dec 29 20:59:42 EST 2008
Author: sartak
Date: Mon Dec 29 20:59:42 2008
New Revision: 17417
Modified:
Prophet/trunk/ (props changed)
Prophet/trunk/lib/Prophet/Server/Dispatcher.pm
Log:
r78050 at onn: sartak | 2008-12-29 20:59:35 -0500
Remove brackets, they're no longer required
Modified: Prophet/trunk/lib/Prophet/Server/Dispatcher.pm
==============================================================================
--- Prophet/trunk/lib/Prophet/Server/Dispatcher.pm (original)
+++ Prophet/trunk/lib/Prophet/Server/Dispatcher.pm Mon Dec 29 20:59:42 2008
@@ -7,27 +7,27 @@
sub token_delimiter {'/'}
sub case_sensitive_tokens {0}
-under ['POST'] => sub {
+under 'POST' => sub {
on qr'.*' => sub {
my $self = shift;
return $self->server->_send_401 if ( $self->server->read_only );
next_rule;
};
- under [ 'records'] => sub {
+ under 'records' => sub {
on qr|^(.*)/(.*)/(.*)$| => sub { shift->server->update_record_prop($1,$2,$3) };
on qr|^(.*)/(.*).json$| => sub { shift->server->update_record($1,$2) };
on qr|^(.*).json$| => sub { shift->server->create_record($1) };
};
};
-under ['GET'] => sub {
+under 'GET' => sub {
on qr'^=/prophet/autocomplete' => sub {
shift->server->show_template('/_prophet_autocompleter') };
on qr'^static/prophet/(.*)$' => sub { shift->server->send_static_file($1)};
on qr'replica/+(.*)$' => sub { shift->server->serve_replica($1) };
on 'records.json' => sub { shift->server->get_record_types };
- under ['records'] => sub {
+ under 'records' => sub {
on qr|^(.*)/(.*)/(.*)$| => sub { shift->server->get_record_prop($1,$2,$3); };
on qr|^(.*)/(.*).json$| => sub { shift->server->get_record($1,$2) };
on qr|^(.*).json$| => sub { shift->server->get_record_list($1) };
More information about the Bps-public-commit
mailing list