--- cfmaps/cfarch2html 2005/11/20 20:37:13 1.9
+++ cfmaps/cfarch2html 2007/02/14 02:33:46 1.14
@@ -1,7 +1,7 @@
#!/opt/bin/perl
# cfarch2html - convert crossfire archetypes to html
-# Copyright (C) 2005 Marc Lehmann
+# Copyright (C) 2005,2007 Marc Lehmann
#
# CFARCH2HTML is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@@ -17,7 +17,7 @@
# along with gvpe; if not, write to the Free Software
# Foundation, Inc. 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
-our $VERSION = '1.03';
+our $VERSION = '1.052';
use Storable;
@@ -34,26 +34,8 @@
$arch = Storable::retrieve "$LIBDIR/archetypes.pst";
-open my $fh, ">:utf8", "arc.xhtml"
- or die "arc.xhtml: $!";
-
-select $fh;
-
-my $W = $meta->{width} * $T;
-my $H = $meta->{height} * $T;
-
-my (@path) = split /\//, $path;
-
-print "",
- "",
- "",
- "Crossfire Archetypes",
- "",
- "",
- "",
- "