From 314201169faaeddaec777d5e9a9ea07c2c5daa3b Mon Sep 17 00:00:00 2001
From: Anonymous <anon@nowhere.org>
Date: Wed, 10 May 2017 17:02:51 +0100
Subject: [PATCH] do not retoot

---
 lobstertoot.pl | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/lobstertoot.pl b/lobstertoot.pl
index af5c98f..30a639f 100644
--- a/lobstertoot.pl
+++ b/lobstertoot.pl
@@ -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;