Changeset 4096d1f


Ignore:
Timestamp:
Jan 9, 2007, 3:46:33 PM (14 years ago)
Author:
Alejandro R. Sedeño <asedeno@mit.edu>
Branches:
master, barnowl_perlaim, debian, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
Children:
5adb3d7
Parents:
3354cea5
Message:
Google Talk wasn't giving us back results. This takes that behavior as
a 401 and asks the user for a password if one hasn't been supplied
yet.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perl/modules/jabber.pl

    r0d5d51b r4096d1f  
    5555    my $jidStr = shift;
    5656    return 0 unless exists $self->{Client}->{$jidStr};
    57    
     57
    5858    $self->{Client}->{$jidStr}->Disconnect();
    5959    delete $self->{Roster}->{$jidStr};
    6060    delete $self->{Client}->{$jidStr};
    61    
     61
    6262    return 1;
    6363}
     
    350350            my @result = $client->AuthSend( %{ $vars{jlogin_authhash} } );
    351351
    352             if ( $result[0] ne 'ok' ) {
    353                 if ( !$vars{jlogin_havepass} && $result[0] eq '401' ) {
     352            if ( $#result == -1 || $result[0] ne 'ok' ) {
     353                if ( !$vars{jlogin_havepass} && ( $#result == -1 || $result[0] eq '401' ) ) {
    354354                    $vars{jlogin_havepass} = 1;
    355355                    $conn->removeConnection($jidStr);
Note: See TracChangeset for help on using the changeset viewer.