hopfully repaired this after backup loss

1 files changed, 0 insertions, 8 deletions

diff --git a/mark_completed.pl b/mark_completed.pl
deleted file mode 100755
index f456011..0000000
--- a/mark_completed.pl
+++ /dev/null
@@ -1,8 +0,0 @@
-#!/usr/bin/perl
-use strict;
-use local::db;
-my $dl_id = $ARGV[0] or die "missing argument download id";
-my $dl = local::db::download->retrieve($dl_id) or die 'cannont find download';
-$dl->completed(1);
-$dl->update;
-exit 0;