gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 11587 - Add UT for IsSuperLibrarian if flags == 0 

Signed-off-by: Jonathan Druart <jonathan.druart@biblibre.com>
Signed-off-by: Galen Charlton <gmc@esilibrary.com>
(cherry picked from commit 850e7e5835)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>

Conflicts:
	t/Context.t
This commit is contained in:
Jonathan Druart 2014-01-24 13:00:37 +01:00 committed by Fridolin Somers
parent e9154d0b0e
commit 50b2d2abb9
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
t/Context.t
View File

@ -2,7 +2,7 @@
use Modern::Perl;
use DBI;
use Test::More tests => 8;
use Test::More tests => 10;
use Test::MockModule;
BEGIN {
@ -34,4 +34,9 @@ is ( $is_super_librarian, 1, "With flag=1, it is a super librarian" );
$userenv->{flags} = undef;
$is_super_librarian = eval{ C4::Context::IsSuperLibrarian() };
is ( $@, q||, "IsSuperLibrarian does not log an error if \$userenv->{flags} is undefined" );
is ( $is_super_librarian, 0, "With flag=undef, it is not a super librarian" );
$userenv->{flags} = 0;
$is_super_librarian = eval{ C4::Context::IsSuperLibrarian() };
is ( $@, q||, "IsSuperLibrarian does not log an error if \$userenv->{flags} is equal to 0" );
is ( $is_super_librarian, 0, "With flag=0, it is not a super librarian" );