X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=tools%2Fupload-cover-image.pl;h=b85a81a73c2dd08a5d83d5764a9af95a78e4dad5;hb=9706908b269ebc068b19a0989ca8af6804b1a540;hp=7552e2813ae8825db5273451d50f9e9826bda8ff;hpb=28646dd55007003300b8c76262c25ab96e04871e;p=koha.git diff --git a/tools/upload-cover-image.pl b/tools/upload-cover-image.pl index 7552e2813a..b85a81a73c 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; @@ -60,7 +61,7 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user( query => $input, type => "intranet", authnotrequired => 0, - flagsrequired => { tools => 'upload_cover_images' }, + flagsrequired => { tools => 'upload_local_cover_images' }, debug => 0, } ); @@ -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++;