projects
/
koha.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 7143 : New committer to history
[koha.git]
/
tools
/
upload-cover-image.pl
diff --git
a/tools/upload-cover-image.pl
b/tools/upload-cover-image.pl
index
7552e28
..
9fe1ad4
100755
(executable)
--- 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::Output;
use C4::Images;
use C4::UploadedFile;
+use C4::Log;
my $debug = 1;
my $debug = 1;
@@
-143,10
+144,15
@@
if ($fileID) {
$error = 'DELERR';
}
else {
$error = 'DELERR';
}
else {
- ( $biblionumber, $filename ) = split $delim, $line;
+ ( $biblionumber, $filename ) = split $delim, $line
, 2
;
$biblionumber =~
s/[\"\r\n]//g; # remove offensive characters
$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++;
my $srcimage = GD::Image->new("$dir/$filename");
if ( defined $srcimage ) {
$total++;