|
version 1.29, 2003/01/08 21:54:49
|
version 1.30, 2003/01/08 23:36:38
|
|
Line 143 sub SelectGroup {
|
Line 143 sub SelectGroup {
|
| } else { |
} else { |
| # Теперь, если файла нет в дереве турниров, никаких вопросов не |
# Теперь, если файла нет в дереве турниров, никаких вопросов не |
| # задаётся, а вместо этого он добавляется в группу 9999 |
# задаётся, а вместо этого он добавляется в группу 9999 |
| $ParentId = 9999; |
$ParentId = 9999; |
| print UNSORTED "$source\n"; |
print UNSORTED "$source".((12 -length($source))x' ')."\t$TourName\n"; |
| $isunsorted=1; |
$isunsorted=1; |
| $sth = $dbh->prepare("INSERT INTO Tournaments |
$sth = $dbh->prepare("INSERT INTO Tournaments |
| (Title, Type, ParentId, FileName) |
(Title, Type, ParentId, FileName) |
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to updatedb.pl CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Local Repository] / db / prgsrc