File: | t/view-linkto.t |
Coverage: | 100.0% |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | #!/usr/bin/env perl -w | ||||||
2 | 1 1 1 | 97 9 9 | use strict; | ||||
3 | 1 1 1 | 107 6 19 | use Test::More tests => 3; | ||||
4 | |||||||
5 | 1 1 1 | 85 4 12 | use Railsish::ViewHelpers; | ||||
6 | |||||||
7 | { | ||||||
8 | 1 1 | 5 9 | my $html = link_to("Dashboard", "/dashboard", class => "nav"); | ||||
9 | 1 | 25 | is($html, qq{<a href="/dashboard" class="nav">Dashboard</a>}); | ||||
10 | } | ||||||
11 | |||||||
12 | { | ||||||
13 | 1 1 | 4 8 | my $html = link_to("<>!", "/dashboard", class => "nav"); | ||||
14 | 1 | 23 | is($html, qq{<a href="/dashboard" class="nav"><>!</a>}); | ||||
15 | } | ||||||
16 | |||||||
17 | { | ||||||
18 | 1 1 | 4 8 | my $html = link_to("<>!", "/dashboard", class => "<>!"); | ||||
19 | 1 | 24 | is($html, qq{<a href="/dashboard" class="<>!"><>!</a>}); | ||||
20 | } |