From ed46eba422b830efc1e095ea1e2b2e1ccb900a71 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Marc=20V=C3=A9ron?= Date: Sun, 15 Mar 2015 19:20:53 +0100 Subject: [PATCH] Bug 13813 - Remove C4::Dates from tools/scheduler.pl To test: Apply patch Go to Home > Tools > Task scheduler Add new tasks Verify that tasks are properly added Signed-off-by: Jonathan Druart --- tools/scheduler.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/tools/scheduler.pl b/tools/scheduler.pl index b55204b..03bf14d 100755 --- a/tools/scheduler.pl +++ b/tools/scheduler.pl @@ -25,7 +25,7 @@ use C4::Reports::Guided; use C4::Auth; use CGI qw ( -utf8 ); use C4::Output; -use C4::Dates; +use Koha::DateUtils;; use vars qw($debug); @@ -62,10 +62,10 @@ my $id = $input->param('id'); if ( $mode eq 'job_add' ) { # Retrieving the date according to the dateformat syspref - my $c4date = C4::Dates->new($input->param('startdate')); + my $c4date = output_pref({ dt => dt_from_string( $input->param('startdate') ), dateformat => 'iso', dateonly => 1 }); # Formatting it for Schedule::At - my $startdate = join('', (split /-/, $c4date->output("iso"))); + my $startdate = join('', (split /-/, $c4date)); my $starttime = $input->param('starttime'); $starttime =~ s/\://g; -- 2.1.0