--- cfmaps/cfmap2html 2005/11/18 06:57:15 1.2
+++ cfmaps/cfmap2html 2005/11/18 12:34:13 1.6
@@ -11,6 +11,8 @@
umask 022;
+our $VERSION = '1.0';
+
sub escape_html($) {
local $_ = shift;
s/([<>&])/sprintf "&#%d;", ord $1/ge;
@@ -18,6 +20,8 @@
}
for my $path (@ARGV) {
+# print STDERR "$path\n";
+
if (!-e "$path.png"
|| !-e "$path.pst"
|| -M "$path.pst" > -M $path
@@ -43,7 +47,7 @@
print "",
"",
"",
- "$path",
+ "Crossfire Map \"$path\"",
"