--- db/prgsrc/db.cgi 2000/10/15 19:49:22 1.1 +++ db/prgsrc/db.cgi 2000/10/15 22:22:26 1.2 @@ -8,8 +8,8 @@ use POSIX qw(locale_h); my ($PWD) = `pwd`; chomp $PWD; -my ($SRCPATH) = "$PWD/../dimrub/src"; -my ($ZIP) = "/usr/local/bin/zip"; +my ($SRCPATH) = "/home/stepanov/baza"; +my ($ZIP) = "/usr/bin/zip"; my ($SENDMAIL) = "/usr/sbin/sendmail"; my ($TMSECS) = 30*24*60*60; my (%RevMonths) = @@ -475,7 +475,7 @@ sub Include_virtual { my ($fn, $output) = (@_, ''); open F , $fn - or die "Can't open the file $fn: $!\n"; + or return; #die "Can't open the file $fn: $!\n"; while () { if (/