Changeset 2097 for libswish3/trunk/perl

Timestamp:

03/23/08 23:49:06 (10 months ago)

Author:

karpet

Message:

write header

Files:

• libswish3/trunk/perl/docmaker.pl (modified) (3 diffs)

libswish3/trunk/perl/docmaker.pl

@@ -10 +10 @@
-
-die $usage unless @ARGV;
+
+my $docmaker = SWISH::Prog::Headers->new;
-
-#$ENV{SWISH3} = 1;
@@ -83 +85 @@
-);
-
-SWISH::Prog::Headers
+$docmaker
-        $xml,
-        {   url   => $i,
@@ -96 +98 @@
-
-}
+
+warn "\n";
+