View | Details | Raw Unified | Return to bug 6132
Collapse All | Expand All

(-)a/t/db_dependent/sysprefs.t (-1 / +14 lines)
Line 0 Link Here
0
- 
1
#!/usr/bin/perl
2
3
use Modern::Perl;
4
use Test::More tests => 2;
5
use C4::Context;
6
7
my $opacheader = C4::Context->preference('opacheader');
8
my $newopacheader = "newopacheader";
9
10
C4::Context->set_preference('OPACHEADER', $newopacheader);
11
ok(C4::Context->preference('opacheader') eq $newopacheader);
12
13
C4::Context->set_preference('opacheader', $opacheader);
14
ok(C4::Context->preference('OPACHEADER') eq $opacheader);

Return to bug 6132