Bug 29394: Remove futuredate for renew
[koha-ffzg.git] / svc / cover_images
index 590a243..7531e8c 100755 (executable)
@@ -22,12 +22,12 @@ use Modern::Perl;
 
 use CGI qw ( -utf8 );
 use C4::Auth qw/check_cookie_auth/;
-use C4::Images;
+use Koha::CoverImages;
 use JSON qw/to_json/;
 
-my $input = new CGI;
+my $input = CGI->new;
 
-my ( $auth_status, $sessionID ) =
+my ( $auth_status ) =
         check_cookie_auth(
             $input->cookie('CGISESSID'),
             { tools => 'upload_local_cover_images' } );
@@ -37,28 +37,27 @@ if ( $auth_status ne "ok" ) {
 }
 
 my $action       = $input->param('action');
-my $biblionumber = $input->param('biblionumber');
 my @imagenumbers = $input->param('imagenumber');
 
 # Array to store the reponse JSON
 my $response = [];
 
 if ( $action eq "delete" ) {
-    # Build a hash of valid imagenumbers fr the given biblionumber
-    my %valid_imagenumbers = map {$_ => 1} ListImagesForBiblio($biblionumber);
 
     foreach my $imagenumber ( @imagenumbers ) {
-        if ( exists( $valid_imagenumbers{ $imagenumber } ) ) {
-            DelImage($imagenumber);
+        eval {
+            Koha::CoverImages->find($imagenumber)->delete;
+        };
+        if ( $@ ) {
             push @$response, {
                 imagenumber => $imagenumber,
-                deleted => 1
+                deleted => 0,
+                error => "MSG_INVALID_IMAGENUMBER"
             };
         } else {
             push @$response, {
                 imagenumber => $imagenumber,
-                deleted => 0,
-                error => "MSG_INVALID_IMAGENUMBER"
+                deleted => 1
             };
         }
     }