Branch Coverage

blib/lib/Template/Plugin/Siesta.pm
Criterion Covered Total %
branch 0 52 0.0


line true false branch
35 0 0 ref $_[0] eq 'HASH' ? :
44 0 0 if $self->action and $self->cgi->param('submit')
61 0 0 if ($action)
62 0 0 if ($self->can("ACTION_$action")) { }
89 0 0 unless (defined $pass1)
92 0 0 if (defined $pass1 and defined $pass2 and $pass1 ne $pass2)
97 0 0 if ($user)
113 0 0 unless ($list)
136 0 0 unless my $user = 'Siesta::Member'->load($email)
139 0 0 unless $pass
140 0 0 if ($pass eq $user->password)
149 0 0 unless my $plugin = 'Siesta::Plugin'->retrieve($self->_getParam('id', '(\\d+)'))
152 0 0 unless $self->user == $list->owner
164 0 0 unless my $list = 'Siesta::List'->load($self->_getParam('list', '(\\S+)'))
166 0 0 unless $self->user->id == $list->owner->id
173 0 0 $self->_getParam('personal', '(\\S+)') ? :
175 0 0 unless (eval { do { $list->add_plugin($queue, ($self->_getParam('personal', '(\\S+)') ? '+' : '') . $type) } })
183 0 0 unless my $plugin = 'Siesta::Plugin'->retrieve($id)
184 0 0 unless $plugin->list->owner->id == $self->user->id
192 0 0 unless my $message = 'Siesta::Deferred'->retrieve($self->_getParam('id', '(\\d+)'))
196 0 0 unless $self->user->id == $message->who
205 0 0 unless my $list = 'Siesta::List'->retrieve($self->_getParam('list', qr/^(\d+)$/))
211 0 0 if ($plugin->personal and ($val) = $self->_getParam("personal_$pref", '(.*)'))
216 0 0 if ($plugin->list->owner == $self->user and ($val) = $self->_getParam("list_$pref", '(.*)'))
231 0 0 if (defined $var)
256 0 0 if ($id)