diff options
author | Birte Kristina Friesel <derf@finalrewind.org> | 2024-05-19 20:04:51 +0200 |
---|---|---|
committer | Birte Kristina Friesel <derf@finalrewind.org> | 2024-05-19 20:04:51 +0200 |
commit | 3f5076eb5a2aee25cf9459b0cb51b9451e830b33 (patch) | |
tree | 502aff06d2936d9f403361edfac0294038b87ff8 /lib/DBInfoscreen.pm | |
parent | 974a5beb737771854663426b0cba5c6dfbf3a813 (diff) |
EFA occupancy: Add "FULL" / 44.27.1
Diffstat (limited to 'lib/DBInfoscreen.pm')
-rw-r--r-- | lib/DBInfoscreen.pm | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/lib/DBInfoscreen.pm b/lib/DBInfoscreen.pm index 6335490..1fd3674 100644 --- a/lib/DBInfoscreen.pm +++ b/lib/DBInfoscreen.pm @@ -187,7 +187,9 @@ sub startup { my ( $self, $occupancy ) = @_; my @symbols - = (qw(help_outline person_outline people priority_high)); + = ( + qw(help_outline person_outline people priority_high not_interested) + ); my $text = 'Auslastung unbekannt'; if ( $occupancy eq 'MANY_SEATS' ) { @@ -199,7 +201,13 @@ sub startup { elsif ( $occupancy eq 'STANDING_ONLY' ) { $occupancy = 3; } + elsif ( $occupancy eq 'FULL' ) { + $occupancy = 4; + } + if ( $occupancy > 3 ) { + $text = 'Voraussichtlich überfüllt'; + } if ( $occupancy > 2 ) { $text = 'Sehr hohe Auslastung erwartet'; } |