diff options
| author | Jonas Smedegaard <dr@jones.dk> | 2023-08-13 11:58:54 +0200 |
|---|---|---|
| committer | Jonas Smedegaard <dr@jones.dk> | 2024-03-10 09:17:24 +0100 |
| commit | 9333ea6304607e727dbad5c11d047785155e1001 (patch) | |
| tree | e7204ab539b2e78f1eb236810a5231d3bb693d61 /bin | |
| parent | cd39ccc5a2a5f03390fbc2d2bc0bb574e65d6ea8 (diff) | |
tidy script
Diffstat (limited to 'bin')
| -rwxr-xr-x | bin/events2md.pl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/bin/events2md.pl b/bin/events2md.pl index 32e057d..751306f 100755 --- a/bin/events2md.pl +++ b/bin/events2md.pl @@ -71,8 +71,10 @@ if ( $base_uri->scheme eq 'http' or $base_uri->scheme eq 'https' ) { if ($mach) { $user ||= $mach->login; $pass ||= $mach->password; - $log->infof( 'will use .netrc provided credentials for user %s', - $user ); + $log->infof( + 'will use .netrc provided credentials for user %s', + $user + ); } elsif ( IO::Interactive::Tiny::is_interactive() ) { $log->warn( @@ -180,6 +182,7 @@ sub print_event ? ucfirst("$date_begin kl. $time_begin-$time_end") : undef; my %attachments; + if ( $entry->property('attach') ) { for ( @{ $entry->property('attach') } ) { my $uri; |