File: | t/text-helpers.t |
Coverage: | 100.0% |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | #!/usr/bin/env perl | ||||||
2 | |||||||
3 | 1 1 1 | 102 9 11 | use strict; | ||||
4 | 1 1 1 | 10 2 11 | use warnings; | ||||
5 | 1 1 1 | 106 6 20 | use Test::More tests => 9; | ||||
6 | |||||||
7 | 1 1 1 | 86 5 23 | use Railsish::TextHelpers; | ||||
8 | |||||||
9 | 1 | 9 | is( pluralize("photo"), "photos"); | ||||
10 | 1 | 9 | is( pluralize("photos"), "photos"); | ||||
11 | 1 | 9 | is( singularize("photo"), "photo"); | ||||
12 | 1 | 9 | is( singularize("photos"), "photo"); | ||||
13 | |||||||
14 | 1 | 9 | is( camelcase("photo_shop"), "PhotoShop" ); | ||||
15 | 1 | 10 | is( camelize("photo_shop"), "PhotoShop" ); | ||||
16 | 1 | 10 | is( dasherize("photo_shop"), "photo-shop" ); | ||||
17 | |||||||
18 | 1 | 8 | is( forien_key("photo"), "photo_id" ); | ||||
19 | 1 | 9 | is( underscore("PhotoShop"), "photo_shop"); | ||||
20 |