diff options
| author | Matthew Lemon <matt@matthewlemon.com> | 2022-09-14 13:29:08 +0100 |
|---|---|---|
| committer | Matthew Lemon <matt@matthewlemon.com> | 2022-09-14 13:29:08 +0100 |
| commit | 533d91f366da5d2b5389c87c5e25d01a65bcdce6 (patch) | |
| tree | f6dd7496d3bed9696b96357c71db394222934d7c | |
| parent | 9015d414a8c4e0ea9616e9a6fe71e62b0a17fc7f (diff) | |
aligned up the code
| -rwxr-xr-x | tw_hooks/on-add_scheduled_work_task.pl | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/tw_hooks/on-add_scheduled_work_task.pl b/tw_hooks/on-add_scheduled_work_task.pl index 44999b7..b3dbeec 100755 --- a/tw_hooks/on-add_scheduled_work_task.pl +++ b/tw_hooks/on-add_scheduled_work_task.pl @@ -79,15 +79,15 @@ my $tags = ${$decoded_task}{tags}; # alternative - not using -> in the ref my $scheduled_dt; if ( $decoded_task->{scheduled} and ( scalar grep { $_ eq "dft" } @{$tags} ) ) { - $scheduled_dt = parse_scheduled $decoded_task->{scheduled}; + $scheduled_dt = parse_scheduled $decoded_task->{scheduled}; # my @test_task = `task add Bobbins from Perl`; - my $port = 22; - my $date = $scheduled_dt->day(); - my $month = $short_months[ $scheduled_dt->month() - 1 ]; - my $year = $scheduled_dt->year(); - my $hr = $scheduled_dt->hour(); - my $min = $scheduled_dt->minute(); - my $time = substr $scheduled_dt->hms(), 0, + my $port = 22; + my $date = $scheduled_dt->day(); + my $month = $short_months[ $scheduled_dt->month() - 1 ]; + my $year = $scheduled_dt->year(); + my $hr = $scheduled_dt->hour(); + my $min = $scheduled_dt->minute(); + my $time = substr $scheduled_dt->hms(), 0, 5; # we do not want seconds in the time format # Convert it into Remind format with %" bits that mean you don't get the # shit in wyrd |