View | Details | Raw Unified | Return to bug 6679
Collapse All | Expand All

(-)a/C4/Message.pm (-4 / +3 lines)
Lines 106-112 sub find { Link Here
106
    if (@$msgs) {
106
    if (@$msgs) {
107
        return $class->new($msgs->[0]);
107
        return $class->new($msgs->[0]);
108
    } else {
108
    } else {
109
        return undef;
109
        return;
110
    }
110
    }
111
}
111
}
112
112
Lines 142-148 sub find_last_message { Link Here
142
    if (@$msgs) {
142
    if (@$msgs) {
143
        return $class->new($msgs->[0]);
143
        return $class->new($msgs->[0]);
144
    } else {
144
    } else {
145
        return undef;
145
        return;
146
    }
146
    }
147
}
147
}
148
148
Lines 316-322 sub append { Link Here
316
    }
316
    }
317
    if (not $self->metadata) {
317
    if (not $self->metadata) {
318
        carp "Can't append to messages that don't have metadata.";
318
        carp "Can't append to messages that don't have metadata.";
319
        return undef;
319
        return;
320
    }
320
    }
321
    my $metadata = $self->metadata;
321
    my $metadata = $self->metadata;
322
    push @{$metadata->{body}}, $item;
322
    push @{$metadata->{body}}, $item;
323
- 

Return to bug 6679