diff options
Diffstat (limited to 'lib/JWebmail/Model/Driver/Mock.pm')
| -rw-r--r-- | lib/JWebmail/Model/Driver/Mock.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/JWebmail/Model/Driver/Mock.pm b/lib/JWebmail/Model/Driver/Mock.pm index eb8c0d0..b2da1be 100644 --- a/lib/JWebmail/Model/Driver/Mock.pm +++ b/lib/JWebmail/Model/Driver/Mock.pm @@ -22,7 +22,9 @@ use constant { sub _read_json_file { my ($file_name) = @_; - open(my $body_file, '<', $file_name); + use constant PREFIX => 't/private/'; + + open(my $body_file, '<', PREFIX . $file_name); local $/; my $body = <$body_file>; close $body_file; @@ -99,4 +101,4 @@ __END__ Mock - Simple file based mock for the L<JWebmail::Model::ReadMails> module. -=cut
\ No newline at end of file +=cut |