package Jifty::Event::Log;
use strict;
use warnings;
use base qw/Jifty::Event/;

=head1 NAME

Jifty::Event::Log - An event that L<Jifty::Logger::EventAppender> creates

=head1 DESCRIPTION

This L<Jifty::Event> is created when a log message happens.

=head1 METHODS

=head2 match QUERY

Matches only if all of the keys in the query exist in the data, and
the values of the keys match the respective values in the data.

=cut

sub match {
    my $self    = shift;
    my $query   = shift;

    for my $key (keys %{$query}) {
        return unless defined $self->data->{$key} and $self->data->{$key} eq $query->{$key};
    }

    return 1;
}

=head2 render_arguments

All of the data is dumped into the redered arguments, verbatim.

=cut

sub render_arguments {
    my $self = shift;
    return ( %{ $self->data } );
}

1;