From 6cb36c2aafc96e98945f6589d5eb8f3f794deeb7 Mon Sep 17 00:00:00 2001 From: Andinus Date: Wed, 25 Nov 2020 21:48:09 +0530 Subject: Remove created_utc property from each comment It was already included but some people might need the raw value so we include that too. It's included in brackets after parsed value. --- draco.pl | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/draco.pl b/draco.pl index ee21f06..d3aa5c1 100755 --- a/draco.pl +++ b/draco.pl @@ -364,10 +364,9 @@ sub print_comment_chain { print ":PROPERTIES:\n"; print ":CREATED_UTC: ", Time::Piece->strptime($comment_data->{created_utc}, '%s') - ->strftime('%+'), "\n"; - foreach my $detail (qw( created_utc author permalink upvote_ratio - ups downs score edited stickied - controversiality )) { + ->strftime('%+'), " (=$comment_data->{created_utc}=)\n"; + foreach my $detail (qw( author permalink upvote_ratio ups downs + score edited stickied controversiality )) { print ":${detail}: =$comment_data->{$detail}=\n" if scalar $comment_data->{$detail}; } -- cgit 1.4.1-2-gfad0