fixes to xt/sysprefs.t test case

[koha.git] / C4 / Ris.pm

diff --git a/C4/Ris.pm b/C4/Ris.pm
index d3026c0..fcb5b89 100644 (file)
--- a/C4/Ris.pm
+++ b/C4/Ris.pm
@@ -57,6 +57,8 @@ package C4::Ris;
 #
 #
 
+#use strict;
+#use warnings; FIXME - Bug 2505
 
 use vars qw($VERSION @ISA @EXPORT);
 
@@ -72,22 +74,14 @@ $VERSION = 3.00;
 );
 
 
-=head2 marc2bibtex - Convert from UNIMARC to RIS
+=head1 marc2bibtex - Convert from UNIMARC to RIS
 
-=over 4
-
-my ($ris) = marc2ris($record);
+  my ($ris) = marc2ris($record);
 
 Returns a RIS scalar
 
-=over 2
-
 C<$record> - a MARC::Record object
 
-=back
-
-=back
-
 =cut
 
 sub marc2ris {