Changeset a8c55b5 for perl/modules/Jabber/lib/Net/Jabber/Component.pm
- Timestamp:
- Sep 9, 2012, 6:26:12 PM (12 years ago)
- Branches:
- master, release-1.10, release-1.9
- Children:
- 736835d, 54d9b42
- Parents:
- 4d9e311c
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/modules/Jabber/lib/Net/Jabber/Component.pm
rc2bed55 ra8c55b5 220 220 $self->{STREAM}->SetCallBacks(node=>undef); 221 221 222 $self->Send("<handshake>".Digest::SHA 1::sha1_hex($self->{SESSION}->{id}.$args{secret})."</handshake>");222 $self->Send("<handshake>".Digest::SHA::sha1_hex($self->{SESSION}->{id}.$args{secret})."</handshake>"); 223 223 my $handshake = $self->Process(); 224 224
Note: See TracChangeset
for help on using the changeset viewer.