--- db/prgsrc/makeauthors.pl 2003/01/08 21:40:21 1.2 +++ db/prgsrc/makeauthors.pl 2003/01/09 01:43:21 1.3 @@ -24,14 +24,16 @@ makeauthors.pl use dbchgk; +my $DUMPDIR = $ENV{DUMPDIR} || "../dump"; + do "chgk.cnf"; use locale; use POSIX qw (locale_h); open NICKS, "<$nicksfile" or die "Can not open nicks"; open SSNICKS, "<$ssnicksfile" or die "Can not open ssnicks"; -open UNKNOWN, ">uauthors"; -open UNICKS, ">unicks"; -open STDERR, ">errors"; +open UNKNOWN, ">$DUMPDIR/uauthors"; +open UNICKS, ">$DUMPDIR/unicks"; +open STDERR, ">$DUMPDIR/errors"; my ($thislocale); if ($^O =~ /win/i) { $thislocale = "Russian_Russia.20866";