[svn r4383] Create autogen directory if it doesn't exist

This commit is contained in:
olly 2002-08-13 14:14:47 +02:00
parent f2cde066e4
commit ffab95421e

View File

@ -1,6 +1,8 @@
#!/usr/bin/perl -w
use strict;
-d "autogen" or mkdir "autogen", 0755;
open IDXALL, ">indxal.htm" or die $!;
print IDXALL <<END;
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0//EN">