# HG changeset patch
# User devi
# Date 1137863374 -7200
# Node ID 440d12c122d5d174ad077c6f100e3856479416be
# Parent  0b1553611bb565dc20503862c6cf750631005d81
В индекс брать только файлы, начинающиеся с 20

diff -r 0b1553611bb5 -r 440d12c122d5 l3-cgi
--- a/l3-cgi	Sat Jan 14 18:23:11 2006 +0200
+++ b/l3-cgi	Sat Jan 21 19:09:34 2006 +0200
@@ -57,7 +57,7 @@
 
 if ($ENV{PATH_INFO} eq "/index") {
 	# Показываем индекс курсов
-	my @training_files = glob($l3config::Config{"path_classes"}."/*".$l3config::Config{"class_suffix"});
+	my @training_files = glob($l3config::Config{"path_classes"}."/2*".$l3config::Config{"class_suffix"});
 	if (@training_files) {
 		for my $training_file (@training_files) {
 			$training_file =~ s@.*/@@;
diff -r 0b1553611bb5 -r 440d12c122d5 l3scripts
--- a/l3scripts	Sat Jan 14 18:23:11 2006 +0200
+++ b/l3scripts	Sat Jan 21 19:09:34 2006 +0200
@@ -53,18 +53,19 @@
 cd $coursepath; make personal; cd ~-
 
 ###POST-makeout
+rnd=${RANDOM}${RANDOM}${RANDOM}
 rm -rf /tmp/$course-$date
 mkdir /tmp/$course-$date
 find $outpath/*$date* -name \*.pdf -exec cp {} /tmp/$course-$date/ \;
 cd /tmp
 rm -rf $course-$date.zip 2> /dev/null
 zip -r $course-$date.zip $course-$date
-mv $course-$date.zip /var/www/tmp/
+mv $course-$date.zip /var/www/igor/tmp/$course-$date-${rnd}.zip
 mutt -s 'Сгенерированы методички' imchubin\@mail.ru <<LETTER
 Сгенерированы методички для курса $course, который начинается $date.
 
 Архив файлов для печати можно получить по адресу:
-http://chub.in/tmp/$course-$date.zip
+http://igor.chub.in/tmp/$course-$date-${rnd}.zip
 Архив будет доступен по этому адресу в течение трех дней.
 
 --