From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Sat, 15 Oct 2011 08:23:22 +0000 (+0200)
Subject: last fallback for slots is calendar description
X-Git-Url: http://git.rot13.org/?p=angular-mojolicious.git;a=commitdiff_plain;h=8bbab7af6a524f4e4eb397fee2b97920375483d2

last fallback for slots is calendar description
---

diff --git a/angular-server.pl b/angular-server.pl
index 1ef3778..5d86f9a 100755
--- a/angular-server.pl
+++ b/angular-server.pl
@@ -230,6 +230,8 @@ use iCal::Parser;
 
 plugin 'proxy';
 
+my $slot_regex = '(\d+)\s*mjesta';
+
 get '/reservations/get/(*url)' => sub {
 	my $self = shift;
 
@@ -267,8 +269,9 @@ get '/reservations/get/(*url)' => sub {
 			SUMMARY
 		)) {
 			next unless exists $_->{$check_slot};
-			$_->{slots} = $1 if $_->{$check_slot} =~ m/(\d+)\s*mjesta/s;
+			$_->{slots} = $1 if $_->{$check_slot} =~ m/$slot_regex/is;
 		}
+		$_->{slots} ||= $1 if $ical->{cal}->{'X-WR-CALDESC'} =~ m/$slot_regex/s;
 		$_;
 	} @events;