[PilotMgr] Re: Screwed up at line 2650.

[Curt Crosby <Curt.Crosby@xxxxxxx>]

Hoping someone can help:

I have included the string below that apparently contains
an error that is not allowing me to sync with my Vx. It may be
an environment change that hosed me out of the blue.

Any ideas?

Thanks in advance. I am really in a mess not being able to sync
or backup anything between the Palm and my Sun.

Curt



Here is the error message I get in PilotManager when
I attempt the sync:

Error: Can't use string ("0") as an ARRAY ref while "strict refs
in use at ./PilotManager line 2650.

                 --------------------------------------
                 
                 
here's the string at 2650...

sub loadDBList
{
    my ($dlp) = @_;
    my ($result, $i) = ([], 0);
    my ($count, $count_max);

    fullStatus("Pilot Manager", "Refreshing Database List", 0);
    $count = 0;
    if (exists($PREFS->{"databases"}) && defined($PREFS->{"databases"}))
    {
        $count_max = @{$PREFS->{"databases"}};
    }
    else
    {
        $count_max = 0;
    }

    my $rec;
    eval { do
    {
        status("Refreshing Database List", int(100 * $count++ / $count_max))
            if ($count_max);
        $rec = $dlp->getDBInfo($i,1,0);
        push(@$result, $rec) if (exists $rec->{"name"} and $rec->{"name"});
        $i = $rec->{"index"}+1;
    }
    while ($rec->{"more"}); };

}






------------------------------------------------------------------------
***********************************************************
*             This is a public mailing list!              *
* Please do not publish Sun proprietary information here! *
*        -  -  -  -  -  -  -  -  -  -  -  -  -  -         *
* MoreInfo/Unsubscribe @  http://www.moshpit.org/pilotmgr *
***********************************************************