File Coverage

blib/lib/Mail/Server/IMAP4/Search.pm
Criterion Covered Total %
statement 12 14 85.7
branch n/a
condition n/a
subroutine 4 5 80.0
pod 0 1 0.0
total 16 20 80.0


line stmt bran cond sub pod time code
1             # This code is part of Perl distribution Mail-Box-IMAP4 version 4.01.
2             # The POD got stripped from this file by OODoc version 3.05.
3             # For contributors see file ChangeLog.
4              
5             # This software is copyright (c) 2001-2025 by Mark Overmeer.
6              
7             # This is free software; you can redistribute it and/or modify it under
8             # the same terms as the Perl 5 programming language system itself.
9             # SPDX-License-Identifier: Artistic-1.0-Perl OR GPL-1.0-or-later
10              
11              
12             package Mail::Server::IMAP4::Search;{
13             our $VERSION = '4.01';
14             }
15              
16 1     1   1241 use parent 'Mail::Box::Search';
  1         2  
  1         10  
17              
18 1     1   4522 use strict;
  1         2  
  1         27  
19 1     1   6 use warnings;
  1         1  
  1         58  
20              
21 1     1   7 use Log::Report 'mail-box-imap4', import => [];
  1         2  
  1         7  
22              
23             #--------------------
24              
25             sub init($)
26 0     0 0   { my ($self, $args) = @_;
27 0           $self->notImplemented;
28             }
29              
30             1;