--- db/prgsrc/db.cgi	2000/10/15 19:49:22	1.1
+++ db/prgsrc/db.cgi	2000/10/17 12:17:15	1.3
@@ -9,13 +9,16 @@ use POSIX qw(locale_h);
 my ($PWD) = `pwd`;
 chomp $PWD;
 my ($SRCPATH) = "$PWD/../dimrub/src";
-my ($ZIP) = "/usr/local/bin/zip";
+my ($ZIP) = "/usr/bin/zip";
 my ($SENDMAIL) = "/usr/sbin/sendmail";
 my ($TMSECS) = 30*24*60*60;
 my (%RevMonths) = 
 	('Jan', '0', 'Feb', '1', 'Mar', '2', 'Apr', '3', 'May', '4', 'Jun', '5',
 	'Jul', '6', 'Aug', '7', 'Sep', '8', 'Oct', '9', 'Nov', '10',
-	'Dec', '11');
+	'Dec', '11',
+	 'Янв', '0', 'Фев', 1, 'Мар', 2, 'Апр', 3, 'Май', '4',
+	 'Июн', '5', 'Июл', 6, 'Авг', '7', 'Сен', '8', 
+	 'Окт', '9', 'Ноя', '19', 'Дек', '11');
 
 # Determine whether the given time is within 2 months from now.
 sub NewEnough {
@@ -475,7 +478,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 (<F>) {
 		if (/<!--#include/o) {