Fixed lharc recognition code to LHA
This commit is contained in:
@@ -595,7 +595,7 @@ void F_Disconnect(faddr *t, char *Area, FILE *tmp)
|
||||
return;
|
||||
}
|
||||
|
||||
if (!TicSystemConnect(&Sys, FALSE)) {
|
||||
if (TicSystemConnect(&Sys, FALSE)) {
|
||||
|
||||
/*
|
||||
* Make sure to write an overview afterwards
|
||||
|
@@ -127,6 +127,11 @@ int ProcessTic(fa_list *sbl)
|
||||
if (TIC.TicIn.Size) {
|
||||
if (TIC.TicIn.Size != TIC.FileSize)
|
||||
WriteError("Size is %ld, expected %ld", TIC.FileSize, TIC.TicIn.Size);
|
||||
} else {
|
||||
/*
|
||||
* No filesize in TIC file, add filesize.
|
||||
*/
|
||||
TIC.TicIn.Size = TIC.FileSize;
|
||||
}
|
||||
|
||||
if (TIC.Crc_Int) {
|
||||
@@ -155,6 +160,7 @@ int ProcessTic(fa_list *sbl)
|
||||
return 1;
|
||||
}
|
||||
|
||||
|
||||
if ((tic.Secure) && (!TIC.TicIn.Hatch)) {
|
||||
First = TRUE;
|
||||
while (GetTicSystem(&Link, First)) {
|
||||
@@ -443,6 +449,7 @@ int ProcessTic(fa_list *sbl)
|
||||
}
|
||||
|
||||
if (!getarchiver(unarc)) {
|
||||
WriteError("Can't get archiver for %s", unarc);
|
||||
chdir(TIC.Inbound);
|
||||
free(Temp);
|
||||
return 1;
|
||||
|
Reference in New Issue
Block a user