1 package t::lib::Mocks::Context;
2 use t::lib::Mocks::Context;
6 my ( $self, $syspref, $value, $mock_object ) = @_;
7 return $value if $syspref eq 'SearchEngine';
8 $mock_object->unmock("preference");
9 my $r = C4::Context->preference($syspref);
10 $mock_object->mock('preference', sub { &t::lib::Mocks::Context::MockPreference( @_, $value, $mock_object ) });