albino
/
lobstertoot
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

do not retoot

This commit is contained in:
Anonymous 2017-05-10 17:02:51 +01:00
parent a1f17e3922
commit 314201169f
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lobstertoot.pl
View File

@ -30,4 +30,11 @@ for my $story (@{$stories}) {
}
$masto->post_status($toot);
push @{ $s->{lobsters}->{storiesdone} }, $story->{short_id};
shift @{ $s->{lobsters}->{storiesdone} } if scalar(@{ $s->{lobsters}->{storiesdone} }) > 500;
}
open my $fh, ">state.json" or die $!;
print $fh encode_json($s);
close $fh;