@@ -, +, @@ files --- C4/UploadedFiles.pm | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) --- a/C4/UploadedFiles.pm +++ a/C4/UploadedFiles.pm @@ -175,11 +175,14 @@ sub UploadFile { my $dbh = C4::Context->dbh; my $query = qq{ - INSERT INTO uploaded_files (id, filename, dir) - VALUES (?,?, ?); + INSERT INTO uploaded_files + (id, filename, dir, filesize, owner) + VALUES (?,?, ?, ?, ?); }; my $sth = $dbh->prepare($query); - if($sth->execute($id, $filename, $dir)) { + my $ue = C4::Context->userenv; + my $owner = $ue? $ue->{number}: undef; + if( $sth->execute($id, $filename, $dir, length($data), $owner ) ) { return $id; } --