From e1a3df0ad2024ac5bb02a6b1137f71b5c7038c92 Mon Sep 17 00:00:00 2001 From: Jonas Smedegaard Date: Tue, 21 Jun 2022 19:51:53 +0200 Subject: tidy script --- bin/events2md.pl | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'bin') 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 => '*'; } -- cgit v1.2.3