Changeset 65fca7a0 for perl/lib


Ignore:
Timestamp:
Mar 1, 2010, 8:33:47 PM (14 years ago)
Author:
Nelson Elhage <nelhage@mit.edu>
Branches:
release-1.5
Children:
7fd450f
Parents:
491cdb1
git-author:
Nelson Elhage <nelhage@mit.edu> (01/07/10 15:51:02)
git-committer:
Nelson Elhage <nelhage@mit.edu> (03/01/10 20:33:47)
Message:
Squelch an 'uninitialized' warning in recv:shift-left.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perl/lib/BarnOwl.pm

    r6700c605 r65fca7a0  
    521521    my $func = shift;
    522522    my $delta = shift;
    523     $delta = 10 unless int($delta) > 0;
     523    $delta = 10 unless defined($delta) && int($delta) > 0;
    524524    my $shift = BarnOwl::recv_getshift();
    525525    if($shift > 0) {
Note: See TracChangeset for help on using the changeset viewer.