<!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>File Coverage: t/run.t</title>
</head>
<body>
<h1>File Coverage</h1>
<table>
<tr><td class="h" align="right">File:</td><td align="left">t/run.t</td></tr>
<tr><td class="h" align="right">Coverage:</td><td align="left" class="c3">100.0%</td></tr>
</table>
<div><br/></div>
<table>
<tr><th>line</th><th>stmt</th><th>bran</th><th>cond</th><th>sub</th><th>pod</th><th>time</th><th>code</th></tr>
<tr><td class="h">1</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">#!/usr/bin/env perl</td></tr>
<tr><td class="h">2</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="t-run-t--subroutine.html#L2">1</a></div></td><td></td><td><div>2070</div><div>1</div><div>28</div></td><td class="s">use strict;</td></tr>
<tr><td class="h">3</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="t-run-t--subroutine.html#L3">1</a></div></td><td></td><td><div>3</div><div>2</div><div>14</div></td><td class="s">use warnings;</td></tr>
<tr><td class="h">4</td><td colspan="7"></td></tr><tr><td class="h">5</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="t-run-t--subroutine.html#L5">1</a></div></td><td></td><td><div>163</div><div>295</div><div>2</div></td><td class="s">use lib 't/lib';</td></tr>
<tr><td class="h">6</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="t-run-t--subroutine.html#L6">1</a></div></td><td></td><td><div>227</div><div>67845</div><div>5</div></td><td class="s">use Test2::V0;</td></tr>
<tr><td class="h">7</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="t-run-t--subroutine.html#L7">1</a></div></td><td></td><td><div>2218</div><div>10568</div><div>37</div></td><td class="s">use HTTP::Request::Common;</td></tr>
<tr><td class="h">8</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="t-run-t--subroutine.html#L8">1</a></div></td><td></td><td><div>459</div><div>535</div><div>26</div></td><td class="s">use Plack::Test;</td></tr>
<tr><td class="h">9</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="t-run-t--subroutine.html#L9">1</a></div></td><td></td><td><div>168</div><div>2</div><div>2</div></td><td class="s">use Yukki::Test;</td></tr>
<tr><td class="h">10</td><td><div class="c3">1</div><div class="c3">1</div><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="t-run-t--subroutine.html#L10">1</a></div></td><td></td><td><div>319</div><div>1</div><div>1115</div></td><td class="s">use URI;</td></tr>
<tr><td class="h">11</td><td colspan="7"></td></tr><tr><td class="h">12</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>47975</div></td><td class="s">yukki_setup;</td></tr>
<tr><td class="h">13</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>79</div></td><td class="s">yukki_add_user(</td></tr>
<tr><td class="h">14</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> username => 'bob',</td></tr>
<tr><td class="h">15</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> password => 'bob', # Too cliche?</td></tr>
<tr><td class="h">16</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> fullname => 'Bob Bobson',</td></tr>
<tr><td class="h">17</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> email => 'bob@example.com',</td></tr>
<tr><td class="h">18</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> groups => [ 'bob', 'bobdog' ],</td></tr>
<tr><td class="h">19</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">);</td></tr>
<tr><td class="h">20</td><td colspan="7"></td></tr><tr><td class="h">21</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>13</div></td><td class="s">yukki_git_init('yukki');</td></tr>
<tr><td class="h">22</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>17</div></td><td class="s">yukki_git_init('main');</td></tr>
<tr><td class="h">23</td><td colspan="7"></td></tr><tr><td class="h">24</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>518</div></td><td class="s">my $app = require "bin/yukki.psgi";</td></tr>
<tr><td class="h">25</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>2554</div></td><td class="s">ok $app, 'got an app';</td></tr>
<tr><td class="h">26</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>2531</div></td><td class="s">is ref $app, 'CODE', 'got a code';</td></tr>
<tr><td class="h">27</td><td colspan="7"></td></tr><tr><td class="h">28</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s">test_psgi</td></tr>
<tr><td class="h">29</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> app => $app,</td></tr>
<tr><td class="h">30</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> client => sub {</td></tr>
<tr><td class="h">31</td><td><div class="c3">1</div></td><td></td><td></td><td><div class="c3"><a href="t-run-t--subroutine.html#L31">1</a></div></td><td></td><td><div>6690</div></td><td class="s"> my $cb = shift;</td></tr>
<tr><td class="h">32</td><td colspan="7"></td></tr><tr><td class="h">33</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>9</div></td><td class="s"> my $res = $cb->(GET "/");</td></tr>
<tr><td class="h">34</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>3425</div></td><td class="s"> like $res->content, qr{Yukki software}, 'got something back';</td></tr>
<tr><td class="h">35</td><td colspan="7"></td></tr><tr><td class="h">36</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>756</div></td><td class="s"> $res = $cb->(POST "/login/submit", [</td></tr>
<tr><td class="h">37</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> login_name => 'bob',</td></tr>
<tr><td class="h">38</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> password => 'bob',</td></tr>
<tr><td class="h">39</td><td></td><td></td><td></td><td></td><td></td><td></td><td class="s"> ]);</td></tr>
<tr><td class="h">40</td><td colspan="7"></td></tr><tr><td class="h">41</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>1140</div></td><td class="s"> is $res->code, 302, 'got main wiki redirect';</td></tr>
<tr><td class="h">42</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>393</div></td><td class="s"> my $loc = URI->new($res->header('Location'));</td></tr>
<tr><td class="h">43</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>94</div></td><td class="s"> is $loc->path, '/page/view/main', 'redirect goes where we expect';</td></tr>
<tr><td class="h">44</td><td colspan="7"></td></tr><tr><td class="h">45</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>282</div></td><td class="s"> $res = $cb->(GET "/page/view/main");</td></tr>
<tr><td class="h">46</td><td colspan="7"></td></tr><tr><td class="h">47</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>3669</div></td><td class="s"> like $res->content, qr{<title class="main-title">Main - Yukki</title>}, 'got to the main wiki page';</td></tr>
<tr><td class="h">48</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>448</div></td><td class="s"> };</td></tr>
<tr><td class="h">49</td><td colspan="7"></td></tr><tr><td class="h">50</td><td><div class="c3">1</div></td><td></td><td></td><td></td><td></td><td><div>947</div></td><td class="s">done_testing;</td></tr>
</table>
</body>
</html>