X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=tools%2Fupload-cover-image.pl;h=9fe1ad43197a661f1ec23d1c4af223187c0a16e9;hb=215c8f4e3b9da5c390c43eb8e3cd704c2861e102;hp=7552e2813ae8825db5273451d50f9e9826bda8ff;hpb=ba6c8485ca7afdaaace20d021591ac532de55b3a;p=koha_fer diff --git a/tools/upload-cover-image.pl b/tools/upload-cover-image.pl index 7552e2813a..9fe1ad4319 100755 --- a/tools/upload-cover-image.pl +++ b/tools/upload-cover-image.pl @@ -48,6 +48,7 @@ use C4::Auth; use C4::Output; use C4::Images; use C4::UploadedFile; +use C4::Log; my $debug = 1; @@ -143,10 +144,15 @@ if ($fileID) { $error = 'DELERR'; } else { - ( $biblionumber, $filename ) = split $delim, $line; + ( $biblionumber, $filename ) = split $delim, $line, 2; $biblionumber =~ s/[\"\r\n]//g; # remove offensive characters - $filename =~ s/[\"\r\n\s]//g; + $filename =~ s/[\"\r\n]//g; + $filename =~ s/^\s+//; + $filename =~ s/\s+$//; + if (C4::Context->preference("CataloguingLog")) { + logaction('CATALOGUING', 'MODIFY', $biblionumber, "cover image: $filename"); + } my $srcimage = GD::Image->new("$dir/$filename"); if ( defined $srcimage ) { $total++;