File Coverage

blib/lib/Wx/Perl/ListView/Model.pm
Criterion Covered Total %
statement 3 7 42.8
branch n/a
condition n/a
subroutine 1 3 33.3
pod 2 2 100.0
total 6 12 50.0


line stmt bran cond sub pod time code
1             package Wx::Perl::ListView::Model;
2              
3             =head1 NAME
4              
5             Wx::Perl::ListView::Model - virtual list control model class
6              
7             =head1 DESCRIPTION
8              
9             An abstract base class for all models.
10              
11             =head1 METHODS
12              
13             =cut
14              
15 1     1   2499 use strict;
  1         2  
  1         148  
16              
17             =head2 get_item
18              
19             my $item = $model->get_item( $row, $column );
20              
21             Where item has the form (only C is mandatory):
22              
23             { string => 'text',
24             image => $image_index,
25             attr => $list_item_attribute,
26             foreground => $foreground_colour,
27             background => $background_colour,
28             font => $font,
29             }
30              
31             =cut
32              
33 0     0 1   sub get_item { my( $self, $row, $column ) = @_; die 'Implement me'; }
  0            
34              
35             =head2 get_item_count
36              
37             my $count = $model->get_item_count;
38              
39             Returns the number of items in the model.
40              
41             =cut
42              
43 0     0 1   sub get_item_count { my( $self ) = @_; die 'Implement me'; }
  0            
44              
45             1;