Index: openacs-4/packages/acs-tcl/tcl/pdf-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/pdf-procs.tcl,v diff -u -r1.4.2.2 -r1.4.2.3 --- openacs-4/packages/acs-tcl/tcl/pdf-procs.tcl 6 Sep 2019 16:00:31 -0000 1.4.2.2 +++ openacs-4/packages/acs-tcl/tcl/pdf-procs.tcl 13 Jul 2020 12:02:33 -0000 1.4.2.3 @@ -45,7 +45,7 @@ } file delete -- $tmp_html_filename - if {[file exists $tmp_pdf_filename]} { + if {[ad_file exists $tmp_pdf_filename]} { return $tmp_pdf_filename } else { return "" @@ -73,7 +73,7 @@ if {[catch {exec $htmldoc_bin --webpage --quiet -t pdf -f $tmp_pdf_filename $tmp_html_filename} err]} { ns_log Error "Error during conversion from html to pdf: $err" } - if {[file exists $tmp_pdf_filename]} { + if {[ad_file exists $tmp_pdf_filename]} { return $tmp_pdf_filename } else { return "" @@ -97,7 +97,7 @@ @return item_id } { - set file_size [file size $pdf_file] + set file_size [ad_file size $pdf_file] set item_id [cr_import_content -title $title -description $description $folder_id $pdf_file $file_size application/pdf $title] return $item_id }