The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
<!DOCTYPE html
     PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
     "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<!--
This file was generated by Devel::Cover Version 1.26
Devel::Cover is copyright 2001-2012, Paul Johnson (paul@pjcj.net)
Devel::Cover is free. It is licensed under the same terms as Perl itself.
The latest version of Devel::Cover should be available from my homepage:
http://www.pjcj.net
-->
<head>
    <meta http-equiv="Content-Type" content="text/html; charset=utf-8"></meta>
    <meta http-equiv="Content-Language" content="en-us"></meta>
    <link rel="stylesheet" type="text/css" href="cover.css"></link>
    <link rel="stylesheet" type="text/css" href="cover.css"></link>
    <title>Branch Coverage: lib/Yukki/Model/Repository.pm</title>
</head>
<body>
<h1>Branch Coverage</h1>
<table>
<tr><td class="h" align="right">File:</td><td align="left">lib/Yukki/Model/Repository.pm</td></tr>
<tr><td class="h" align="right">Coverage:</td><td align="left" class="c0">1.7%</td></tr>
</table>
<div><br/></div>
<table>
<tr><th>line</th><th>%</th><th colspan="2">coverage</th><th>branch</th></tr>
<tr><td class="h"><a id="L199">199</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if (ref $_[0]) { }</td></tr>
<tr><td class="h"><a id="L211">211</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if (defined $blob) { }</td></tr>
<tr><td class="h"><a id="L224">224</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if (@new_path)</td></tr>
<tr><td class="h"><a id="L228">228</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if (@new_path == 0) { }</td></tr>
<tr><td class="h"><a id="L241">241</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if (@old_path)</td></tr>
<tr><td class="h"><a id="L250">250</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if (defined $base)</td></tr>
<tr><td class="h"><a id="L255">255</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if (defined $new_name and $old_file eq $new_name) { }</td></tr>
<tr><td class="h"></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">elsif (defined $old_name and $old_file eq $old_name) { }</td></tr>
<tr><td class="h"><a id="L261">261</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if $old_type ne $new_type</td></tr>
<tr><td class="h"><a id="L266">266</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if ($new_type eq &#39;blob&#39;) { }</td></tr>
<tr><td class="h"></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">elsif ($old_name eq $new_name) { }</td></tr>
<tr><td class="h"><a id="L290">290</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">unless ($remove_here)</td></tr>
<tr><td class="h"><a id="L304">304</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if ($new_name and not $overwrite)</td></tr>
<tr><td class="h"><a id="L307">307</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if ($new_type eq &#39;blob&#39;) { }</td></tr>
<tr><td class="h"><a id="L369">369</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if ($name eq $self-&gt;branch)</td></tr>
<tr><td class="h"><a id="L439">439</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if ($_ =~ /Not a valid object name/u) { }</td></tr>
<tr><td class="h"><a id="L453">453</a></td><td class="c0">50</td><td class="c3">T</td><td class="c0">F</td><td class="s">if ($name eq $path)</td></tr>
<tr><td class="h"><a id="L489">489</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if $name eq $path</td></tr>
<tr><td class="h"><a id="L512">512</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">unless $type eq &#39;blob&#39;</td></tr>
<tr><td class="h"><a id="L515">515</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if ($name =~ s/\.(?&lt;filetype&gt;[a-z0-9]+)$//u)</td></tr>
<tr><td class="h"><a id="L616">616</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if ($mode eq &#39;log&#39;) { }</td></tr>
<tr><td class="h"></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">elsif ($mode eq &#39;stat&#39;) { }</td></tr>
<tr><td class="h"></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">elsif ($mode eq &#39;skip&#39;) { }</td></tr>
<tr><td class="h"><a id="L632">632</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if ($path eq $full_path)</td></tr>
<tr><td class="h"><a id="L643">643</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">unless $line =~ /\S/u</td></tr>
<tr><td class="h"><a id="L681">681</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if $i++ &lt; 5</td></tr>
<tr><td class="h"><a id="L684">684</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if ($type =~ /^(?:~| |\+|-)$/u) { }</td></tr>
<tr><td class="h"></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">elsif ($type eq &#39;\\&#39;) { }</td></tr>
<tr><td class="h"><a id="L685">685</a></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">if ($last_chunk_type eq $type) { }</td></tr>
<tr><td class="h"></td><td class="c0">0</td><td class="c0">T</td><td class="c0">F</td><td class="s">elsif ($type eq &#39;~&#39;) { }</td></tr>
</table>
</body>
</html>