diff options
| author | Edmund von der Burg <evdb@mysociety.org> | 2011-02-23 17:46:46 +0000 |
|---|---|---|
| committer | Edmund von der Burg <evdb@mysociety.org> | 2011-02-23 17:46:46 +0000 |
| commit | fe18ee66aa7d97a070990731316152b74b132e65 (patch) | |
| tree | c46f792435e1cbe7a3f18d9b538240b570e0b772 /t/fixmystreet.t | |
| parent | 1498dfdec73becf769c3596bf41185f003c2a4cf (diff) | |
FMS util module and tests
Diffstat (limited to 't/fixmystreet.t')
| -rw-r--r-- | t/fixmystreet.t | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/t/fixmystreet.t b/t/fixmystreet.t new file mode 100644 index 000000000..c1b3f0075 --- /dev/null +++ b/t/fixmystreet.t @@ -0,0 +1,16 @@ +use strict; +use warnings; +use Path::Class; + +use Test::More tests => 4; + +use_ok 'FixMyStreet'; + +# check that the path_to works +my $file_path = file(__FILE__)->absolute->stringify; +my $path_to_path = FixMyStreet->path_to('t/fixmystreet.t'); + +isa_ok $path_to_path, 'Path::Class::File'; +ok $path_to_path->is_absolute, "path is absolute"; +is "$path_to_path", $file_path, "got $file_path"; + |