Moved doc/*.pod to lib/Maypole/Manual/ and added new Maypole.pm

[maypole.git] / doc / makedoc.pl

diff --git a/doc/makedoc.pl b/doc/makedoc.pl
deleted file mode 100644 (file)
index b6dec2f..0000000
--- a/doc/makedoc.pl
+++ /dev/null
@@ -1,21 +0,0 @@
-my @templates = <../templates/factory/*>;
-
-my %doc;
-
-for my $template (@templates) {
-    open TEMP, $template or die $!;
-    $template =~ s/.*factory\///g;
-    while (<TEMP>) {
-        next unless /^#?=for doc/... /^#?=cut/
-                    and not /(%#?\]|\[%#?)$/
-                    and not /=cut|=for doc/; # Much magic.
-        s/^\s*#//g;
-        $doc{$template} .= $_;
-    }
-}
-
-while (<>) {
-    if (!/^=template (\w+)/) { print; next; }
-    die "Can't find doc for template $1" unless $doc{$1};
-    print $doc{$1};
-}