default number of slots
authorDobrica Pavlinusic <dpavlin@rot13.org>
Tue, 4 Dec 2012 17:09:30 +0000 (18:09 +0100)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Tue, 4 Dec 2012 17:09:30 +0000 (18:09 +0100)
angular-server.pl

index 3dad3c4..09ca4b3 100755 (executable)
@@ -272,6 +272,7 @@ get '/reservations/get/(*url)' => sub {
                        $_->{slots} = $1 if $_->{$check_slot} =~ m/$slot_regex/is;
                }
                $_->{slots} ||= $1 if $ical->{cal}->{'X-WR-CALDESC'} =~ m/$slot_regex/s;
+               $_->{slots} ||= 15; # XXX default number of slots
                $_;
        } @events;
 
@@ -294,11 +295,11 @@ get '/reservations/events/:view_name' => sub {
                        language => 'javascript',
                        views => {
                                submited => {
-                                       map    => q|
+                                       map    => q|(
                                                function(doc) {
                                                        if ( doc.event && doc.event.UID ) emit(doc.event.UID, 1)
                                                }
-                                       |,
+                                       )|,
                                        reduce => q|_sum|,
                                }
                        }