diff --git a/lib/MogileFS/ReplicationRequest.pm b/lib/MogileFS/ReplicationRequest.pm index a5b0828d..e766e15c 100644 --- a/lib/MogileFS/ReplicationRequest.pm +++ b/lib/MogileFS/ReplicationRequest.pm @@ -1,9 +1,9 @@ package MogileFS::ReplicationRequest; use strict; -use MogileFS::Server; require Exporter; our @ISA = qw(Exporter); our @EXPORT_OK = qw(rr_upgrade ALL_GOOD TOO_GOOD TEMP_NO_ANSWER); +require MogileFS::Server; my $no_answer = bless { temp_fail => 1 }; sub TEMP_NO_ANSWER () { $no_answer } diff --git a/t/29-replreq.t b/t/29-replreq.t new file mode 100644 index 00000000..f80bcf68 --- /dev/null +++ b/t/29-replreq.t @@ -0,0 +1,10 @@ +# -*-perl-*- + +use strict; +use warnings; + +use Test::More; + +BEGIN { use_ok('MogileFS::ReplicationRequest'); } + +done_testing();