Changeset 64 for trunk/lib/DJabberd/IQ.pm
- Timestamp:
- 04/08/06 23:16:41 (4 years ago)
- Files:
-
- 1 modified
-
trunk/lib/DJabberd/IQ.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/lib/DJabberd/IQ.pm
r54 r64 35 35 sub signature { 36 36 my $iq = shift; 37 my $fc = $iq->first_ child;37 my $fc = $iq->first_element; 38 38 # FIXME: should signature ever get called on a bogus IQ packet? 39 39 return $iq->type . "-" . ($fc ? $fc->element : "(BOGUS)");
