Bug 23083: Add tests
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
(cherry picked from commit 44469cf4c3)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
parent
646072e1cf
commit
dd850bdd07
|
|
@ -23,7 +23,7 @@ use C4::CourseReserves qw/ModCourseItem ModCourseReserve DelCourseReserve GetCou
|
|||
use C4::Context;
|
||||
use Koha::Items;
|
||||
|
||||
use Test::More tests => 27;
|
||||
use Test::More tests => 28;
|
||||
|
||||
BEGIN {
|
||||
require_ok('C4::CourseReserves');
|
||||
|
|
@ -148,7 +148,17 @@ ModCourseReserve(
|
|||
);
|
||||
|
||||
$item = Koha::Items->find($itemnumber);
|
||||
is($item->ccode, 'DVD', 'Item ccode should be BOOK');
|
||||
is($item->ccode, 'DVD', 'Item ccode should be DVD');
|
||||
|
||||
ModCourseItem(
|
||||
itemnumber => $itemnumber,
|
||||
itype => 'BK',
|
||||
ccode => 'BOOK',
|
||||
holdingbranch => '', # LEAVE UNCHANGED
|
||||
location => 'TH',
|
||||
);
|
||||
$item = Koha::Items->find($itemnumber);
|
||||
is($item->ccode, 'BOOK', 'Item ccode should be BOOK');
|
||||
|
||||
$course_item2 = GetCourseItem( ci_id => $ci_id2 );
|
||||
is($course_item2->{ccode}, '', 'Course item ccode should be empty');
|
||||
|
|
|
|||
Loading…
Reference in New Issue