diff options
Diffstat (limited to 'lib/Travelynx.pm')
-rwxr-xr-x | lib/Travelynx.pm | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm index d04171e..d473fd2 100755 --- a/lib/Travelynx.pm +++ b/lib/Travelynx.pm @@ -467,6 +467,21 @@ sub startup { ); $self->helper( + 'load_icon' => sub { + my ( $self, $load ) = @_; + my $first = $load->{FIRST} // 0; + my $second = $load->{SECOND} // 0; + + my @symbols + = ( + qw(help_outline person_outline people priority_high not_interested) + ); + + return ( $symbols[$first], $symbols[$second] ); + } + ); + + $self->helper( 'checkin' => sub { my ( $self, %opt ) = @_; |