aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJonas Smedegaard <dr@jones.dk>2021-05-20 00:52:56 +0200
committerJonas Smedegaard <dr@jones.dk>2024-08-27 23:39:36 +0200
commit11a760d64cbf5e87b5731cb87fa69632b47b70d9 (patch)
tree04eefa02faed58b4bb37429297b24b6fae95e3cf
parent487dcb5409b13014a5173f1cda3b3667c9929a2b (diff)
tidy: rename internal variable calendar_event -> entry
-rwxr-xr-xbin/events2md.pl8
1 files changed, 4 insertions, 4 deletions
diff --git a/bin/events2md.pl b/bin/events2md.pl
index 71111c3..2964867 100755
--- a/bin/events2md.pl
+++ b/bin/events2md.pl
@@ -170,11 +170,11 @@ for my $year ( map { $_->value }
sub print_event
{
- my ( $calendar_event, $event, $path ) = @_;
+ my ( $entry, $event, $path ) = @_;
if ( $log->is_trace ) {
use DDP;
- p $calendar_event;
+ p $entry;
p $event;
}
my $summary = unescape( $event->{SUMMARY} );
@@ -192,8 +192,8 @@ sub print_event
$time_begin .= $event->{DTSTART}->strftime(' %e. %B kl. %k.%M');
my $time_end = $event->{DTEND}->strftime('%k.%M');
my %attachments;
- if ( $calendar_event->property('attach') ) {
- for ( @{ $calendar_event->property('attach') } ) {
+ if ( $entry->property('attach') ) {
+ for ( @{ $entry->property('attach') } ) {
my $uri = try { URI->new( $_->value ) }
or next;
$uri->authority and $uri->host