diff options
author | Andinus <andinus@nand.sh> | 2020-11-25 22:14:29 +0530 |
---|---|---|
committer | Andinus <andinus@nand.sh> | 2020-11-25 22:14:29 +0530 |
commit | b97357cf8260a18a3fe283b34587cd265addcfb3 (patch) | |
tree | eab48d31792551ead5d1487aebba1d967a33ae41 /draco.pl | |
parent | 6cb36c2aafc96e98945f6589d5eb8f3f794deeb7 (diff) | |
download | draco-b97357cf8260a18a3fe283b34587cd265addcfb3.tar.gz |
Remvove ups, downs from properties & add author_flair_text
Looks like downs is always set to 0 & ups is equal to score so no point in saving those.
Diffstat (limited to 'draco.pl')
-rwxr-xr-x | draco.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/draco.pl b/draco.pl index d3aa5c1..f3770b6 100755 --- a/draco.pl +++ b/draco.pl @@ -365,8 +365,8 @@ sub print_comment_chain { print ":CREATED_UTC: ", Time::Piece->strptime($comment_data->{created_utc}, '%s') ->strftime('%+'), " (=$comment_data->{created_utc}=)\n"; - foreach my $detail (qw( author permalink upvote_ratio ups downs - score edited stickied controversiality )) { + foreach my $detail (qw( author permalink score edited stickied + controversiality author_flair_text )) { print ":${detail}: =$comment_data->{$detail}=\n" if scalar $comment_data->{$detail}; } |