--- db/prgsrc/db.cgi	2001/05/17 01:33:59	1.15
+++ db/prgsrc/db.cgi	2001/05/17 03:46:25	1.16
@@ -7,6 +7,7 @@ use strict;
 use Time::Local;
 use POSIX qw(locale_h);
 my $debug=1; #added by R7
+open STDERR ">/home/roma7/errors" if $debug;
 my ($PWD) = `pwd`;
 chomp $PWD;
 my ($SRCPATH) = "$PWD/../dimrub/src";