diff options
Diffstat (limited to '')
| -rw-r--r-- | tw_hooks/scratch.pl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/tw_hooks/scratch.pl b/tw_hooks/scratch.pl index bbb0a91..bb3443f 100644 --- a/tw_hooks/scratch.pl +++ b/tw_hooks/scratch.pl @@ -29,8 +29,11 @@ if ($decoded_task->{scheduled} and (scalar grep {$_ eq "dft" } @{$tags})) { 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 = $scheduled_dt->hms(); # Convert it into Remind format - my $remind_line = "REM $date $month $year AT 10:00 $original_description"; + my $remind_line = "REM $date $month $year AT $time $original_description"; print $remind_line; } else { print encode_json $decoded_task; |