diff options
author | Jonas Smedegaard <dr@jones.dk> | 2022-06-21 19:51:53 +0200 |
---|---|---|
committer | Jonas Smedegaard <dr@jones.dk> | 2024-08-27 23:39:36 +0200 |
commit | 35ee391141bcb40e1eb29a132b593561178cca17 (patch) | |
tree | b759cfdd9dcdc4c22f59cd662816d5ad85fb79bb | |
parent | 357c98a0939c2d996b66d803b86acb23780ced5c (diff) |
tidy script
-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 7cb41f0..c758577 100755 --- a/bin/events2md.pl +++ b/bin/events2md.pl @@ -50,6 +50,7 @@ $base_uri or $log->fatal('required base URI not provided') && exit 2; $base_uri->scheme or $base_uri->scheme('file'); + if ( $base_uri->scheme eq 'http' or $base_uri->scheme eq 'https' ) { $log->infof( 'will use base URI %s', $base_uri ); $calendar_uri = URI->new( $CALENDAR_URI || $base_uri ); @@ -70,10 +71,12 @@ 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('will ask for missing info - this will fail in headless mode'); + $log->warn( + 'will ask for missing info - this will fail in headless mode'); $user ||= prompt 'Enter your username'; $pass ||= prompt 'Enter your password', -echo => '*'; } |