Skip to content

Commit 583d265

Browse files
committed
Move from File::Slurp to File::Slurper
1 parent 499965b commit 583d265

File tree

5 files changed

+8
-8
lines changed

5 files changed

+8
-8
lines changed

META.yml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -5,7 +5,7 @@ author:
55
- Wesley Schwengle <waterkip@cpan.org>
66
build_requires:
77
ExtUtils::MakeMaker: '6.59'
8-
File::Slurp: '0'
8+
File::Slurper: '0'
99
Test::Exception: '0'
1010
Test::More: '0.88'
1111
configure_requires:

Makefile.PL

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -84,7 +84,7 @@ author_requires 'Test::Pod' => '1.14';
8484
author_requires 'Test::Pod::Coverage' => '1.04';
8585

8686
test_requires 'Test::More' => '0.88';
87-
test_requires 'File::Slurp';
87+
test_requires 'File::Slurper';
8888
test_requires 'Test::Exception';
8989

9090
resources

t/02-verify-good-cert.t

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,12 +1,12 @@
11
use Test::More;
22
use Crypt::OpenSSL::Verify;
33
use Crypt::OpenSSL::X509;
4-
use File::Slurp qw(read_file);
4+
use File::Slurper qw(read_text);
55

66
my $v = Crypt::OpenSSL::Verify->new('t/cacert.pem');
77
isa_ok($v, 'Crypt::OpenSSL::Verify');
88

9-
my $text = read_file('t/cert.pem');
9+
my $text = read_text('t/cert.pem');
1010
like($text, qr/E1dSkFDk4Jix1M19WqRGMla8/, "seems to be a pem");
1111

1212
my $cert = Crypt::OpenSSL::X509->new_from_string($text);

t/06-verify-expired-cert.t

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,13 +1,13 @@
11
use Test::More;
22
use Crypt::OpenSSL::Verify;
33
use Crypt::OpenSSL::X509;
4-
use File::Slurp qw(read_file);
4+
use File::Slurper qw(read_text);
55
use Test::Exception;
66

77
my $v = Crypt::OpenSSL::Verify->new('t/cacert.pem', { strict_certs => 0 });
88
isa_ok($v, 'Crypt::OpenSSL::Verify');
99

10-
my $text = read_file('t/cert-expired.pem');
10+
my $text = read_text('t/cert-expired.pem');
1111
like($text, qr/BhMCQ0ExFjAUBgNVBAgMDU5ldyBC/);
1212

1313
my $cert = Crypt::OpenSSL::X509->new_from_string($text);

t/bug-null-operation.t

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -11,14 +11,14 @@ package Test::Bug;
1111
our @EXPORT = qw(test_null_operation_bug);
1212

1313
use Crypt::OpenSSL::Verify;
14-
use File::Slurp qw(read_file);
14+
use File::Slurper qw(read_text);
1515
use Crypt::OpenSSL::X509;
1616

1717
sub test_null_operation_bug {
1818
my ($ca, $cert) = @_;
1919

2020
my $x = Crypt::OpenSSL::Verify->new($ca);
21-
my $x509 = Crypt::OpenSSL::X509->new_from_string(scalar read_file($cert));
21+
my $x509 = Crypt::OpenSSL::X509->new_from_string(scalar read_text($cert));
2222

2323
return $x->verify($x509);
2424
}

0 commit comments

Comments
 (0)