1 files changed, 0 insertions, 20 deletions
diff --git a/scripts/missing-journal-tag-create b/scripts/missing-journal-tag-create
deleted file mode 100755
index 62dda5a..0000000
--- a/scripts/missing-journal-tag-create
+++ /dev/null
@@ -1,20 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-
-open(INPUT, "<", "/home/liw/Journal/html/index.html");
-while (<INPUT>) {
-    if (/^<li><span class="createlink">.*page=%2Ftag%2F([^&]*)&amp;from=notes%2F.*\n$/) {
-        s//$1/;
-        my $tag = $_;
-        my $pathname = "/home/liw/Journal/src/tag/$tag.mdwn";
-        if (!-e $pathname) {
-            print "$tag\n";
-            open(OUTPUT, ">", $pathname);
-            print OUTPUT "[[!inline archive=yes pages=\"link(tag/$tag)\"]]\n";
-            close(OUTPUT);
-        }
-    }
-}
-