- throws_ok { my $r = haspermission( $borr1->{userid} ); }
- 'Koha::Exceptions::WrongParameter',
- 'Exception thrown when missing $requiredflags';
- throws_ok { my $r = haspermission( $borr1->{userid}, undef ); }
- 'Koha::Exceptions::WrongParameter', 'Exception thrown when explicit undef';
+ #throws_ok { my $r = haspermission( $borr1->{userid} ); }
+ #'Koha::Exceptions::WrongParameter',
+ # 'Exception thrown when missing $requiredflags';
+ #throws_ok { my $r = haspermission( $borr1->{userid}, undef ); }
+ #'Koha::Exceptions::WrongParameter', 'Exception thrown when explicit undef';