Patch level :10.0 188

Files correlati     :ba1.exe
Ricompilazione Demo : [ ]
Commento            :ritocchi alla packindex per segnalazioni in installazione


git-svn-id: svn://10.65.10.50/trunk@17841 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2008-12-10 10:49:12 +00:00
parent 5e6ffe80f2
commit 99fe943879

View File

@ -2337,20 +2337,23 @@ int TSystemisamfile::packindex(
// @xref <mf TSystemisamfile::packfile>
{
int err=NOERR;
int err = NOERR;
TRecnotype peod;
TTrec r;
TDir d;
r.get(num());
d.get(num(),_nolock, _nordir,_sysdirop);
d.get(num(), _nolock, _nordir, _sysdirop);
bool is_com = d.is_com();
d.get(num(),_nolock, is_com ? _comdir : _nordir);
err=DB_packindex(vis,d.name(),r.rec(),&peod,ask);
d.get(num(), _nolock, is_com ? _comdir : _nordir);
err = DB_packindex(vis, d.name(), r.rec(), &peod, ask);
if (err != NOERR)
err = get_error(err);
if (err != NOERR)
error_box("Errore in compattamento indici.\nFile %d : %d", num(),err);
{
if (vis)
error_box("Errore in compattamento indici.\nFile %d : %d", num(),err);
}
else
if (peod >= 0 && peod != d.eod())
{