Index: openacs-4/packages/acs-content-repository/tcl/content-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/content-procs.tcl,v diff -u -r1.12.2.2 -r1.12.2.3 --- openacs-4/packages/acs-content-repository/tcl/content-procs.tcl 18 Jan 2014 11:36:44 -0000 1.12.2.2 +++ openacs-4/packages/acs-content-repository/tcl/content-procs.tcl 9 May 2014 08:25:45 -0000 1.12.2.3 @@ -143,12 +143,17 @@ } { set dir [cr_fs_path] + set logName $dir/file-creation.log ad_mutex_eval [nsv_get mutex cr_file_creation] { - set f [open $dir/file-creation.log] - set content [read $f] - close $f - # truncate the log file - set f [open $dir/file-creation.log w]; close $f + if {[file readable $logName]} { + set f [open $logName] + set content [read $f] + close $f + # truncate the log file + set f [open $logName w]; close $f + } else { + set content "" + } } return $content }