use strict;
use warnings;
-use Test::More tests => 5;
+use Test::More tests => 7;
# We need C4::Dates to handle the dates
use C4::Dates;
+use C4::Context;
+use t::lib::Mocks qw/mock_preference/; # to mock CronjobLog
+use Data::Dumper;
+
+$| = 1;
BEGIN {
use_ok('C4::Log');
$success = 0;
};
ok($success, "GetLogs seemed to find ".$success." like our test record in a tighter search");
+
+# Make sure we can rollback.
+my $dbh = C4::Context->dbh;
+$dbh->{AutoCommit} = 0;
+$dbh->{RaiseError} = 1;
+
+# We want numbers to be the same between runs.
+$dbh->do("DELETE FROM action_logs;");
+
+t::lib::Mocks::mock_preference('CronjobLog',0);
+cronlogaction();
+my $cronJobCount = $dbh->selectrow_array("SELECT COUNT(*) FROM action_logs WHERE module='CRONJOBS';",{});
+is($cronJobCount,0,"Cronjob not logged as expected.");
+
+t::lib::Mocks::mock_preference('CronjobLog',1);
+cronlogaction();
+$cronJobCount = $dbh->selectrow_array("SELECT COUNT(*) FROM action_logs WHERE module='CRONJOBS';",{});
+is($cronJobCount,1,"Cronjob logged as expected.");
+
+$dbh->rollback();