Changeset 79c06ae for perl


Ignore:
Timestamp:
Sep 10, 2007, 8:00:45 PM (13 years ago)
Author:
Nelson Elhage <nelhage@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:
27d8d83
Parents:
18e28a4
Message:
Use "" instead of `undef' as a default for messages with no reply
command to hopefully squelch perl warnings.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perl/modules/Jabber/lib/BarnOwl/Module/Jabber.pm

    rf032974 r79c06ae  
    904904                              sid => $sid } );
    905905    $jhash{type} = 'admin';
     906   
    906907    BarnOwl::queue_message( BarnOwl::Message->new(%jhash) );
    907908}
     
    11341135    }
    11351136    elsif ( $jtype eq 'normal' ) {
    1136         $props{replycmd}  = undef;
     1137        $props{replycmd}  = "";
    11371138        $props{private} = 1;
    11381139    }
    11391140    elsif ( $jtype eq 'headline' ) {
    1140         $props{replycmd} = undef;
     1141        $props{replycmd} = "";
    11411142    }
    11421143    elsif ( $jtype eq 'error' ) {
    1143         $props{replycmd} = undef;
     1144        $props{replycmd} = "";
    11441145        $props{body}     = "Error "
    11451146          . $props{error_code}
Note: See TracChangeset for help on using the changeset viewer.