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

(-)a/C4/Ris.pm (+2 lines)
Lines 558-563 $clean_subtitle ||= q{}; Link Here
558
	## be written and designated. The field is free-form and resistant
558
	## be written and designated. The field is free-form and resistant
559
	## to all parsing efforts, so this information is lost on me
559
	## to all parsing efforts, so this information is lost on me
560
    }
560
    }
561
    return;
561
}
562
}
562
563
563
##********************************************************************
564
##********************************************************************
Lines 590-595 sub print_stitle { Link Here
590
	    }
591
	    }
591
	}
592
	}
592
    }
593
    }
594
    return;
593
}
595
}
594
596
595
##********************************************************************
597
##********************************************************************
(-)a/t/Ris.t (-5 / +4 lines)
Lines 3-17 Link Here
3
# This Koha test module is a stub!  
3
# This Koha test module is a stub!  
4
# Add more tests here!!!
4
# Add more tests here!!!
5
5
6
use strict;
6
use Modern::Perl;
7
use warnings;
8
7
8
use t::lib::Mocks;
9
use Test::More tests => 4;
9
use Test::More tests => 4;
10
10
11
BEGIN {
11
BEGIN {
12
        use_ok('C4::Ris');
12
    use_ok('C4::Ris');
13
}
13
}
14
14
t::lib::Mocks::mock_preference('marcflavour', 'MARC21');
15
is(C4::Ris::print_typetag(),undef,'test printing typetag');
15
is(C4::Ris::print_typetag(),undef,'test printing typetag');
16
16
17
is(C4::Ris::print_title(),undef, 'test printing title when print_title is nil');
17
is(C4::Ris::print_title(),undef, 'test printing title when print_title is nil');
18
- 

Return to bug 16668