X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=C4%2FScheduler.pm;h=e4bdb9b5057f2ccc3487ab93ea7c95539b66ed60;hb=d50d4568e26cbf681430ea8aa9fd1c4073e4dc57;hp=f4230a2d72a8dc36cad72d9a6a95df17bab9e402;hpb=7279f55b60e02780df6b65c4c92ade9f413d5c01;p=koha_fer

diff --git a/C4/Scheduler.pm b/C4/Scheduler.pm
index f4230a2d72..e4bdb9b505 100644
--- a/C4/Scheduler.pm
+++ b/C4/Scheduler.pm
@@ -18,6 +18,7 @@ package C4::Scheduler;
 # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 
 use strict;
+#use warnings; FIXME - Bug 2505
 
 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
 use C4::Context;
@@ -42,14 +43,11 @@ C4::Scheduler - Module for running jobs with the unix at command
 
 =head1 DESCRIPTION
 
+=cut
 
 =head1 METHODS
 
-=over 2
-
-=cut
-
-=item get_jobs();
+=head2 get_jobs();
 
 This will return all scheduled jobs
 
@@ -61,7 +59,7 @@ sub get_jobs {
     return ($jobs);
 }
 
-=item get_at_jobs();
+=head2 get_at_jobs();
 
 This will return all At scheduled jobs
 
@@ -72,7 +70,7 @@ sub get_at_jobs {
 	return (\%jobs);
 }
 
-=item get_at_job($id)
+=head2 get_at_job($id)
 
 This will return the At job with the given id
 
@@ -83,7 +81,7 @@ sub get_at_job {
 	my %jobs = Schedule::At::getJobs(JOBID => $id);
 }
 
-=item add_at_job ($time,$command)
+=head2 add_at_job ($time,$command)
 
 Given a timestamp and a command this will schedule the job to run at that time.
 
@@ -136,13 +134,11 @@ sub remove_at_job {
 1;
 __END__
 
-=back
-
 =head1 BUGS
 
 At some point C<C4::Scheduler> should be refactored:
 
-=over 4
+=over
 
 =item At and C<Schedule::At> does not work on Win32.