Index: openacs-4/packages/xowiki/tcl/xowiki-utility-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-utility-procs.tcl,v
diff -u -r1.57.2.12 -r1.57.2.13
--- openacs-4/packages/xowiki/tcl/xowiki-utility-procs.tcl	3 May 2020 17:17:18 -0000	1.57.2.12
+++ openacs-4/packages/xowiki/tcl/xowiki-utility-procs.tcl	13 Jul 2020 12:02:33 -0000	1.57.2.13
@@ -106,7 +106,7 @@
         && [info commands ::util::which] ne ""} {
       set clamscanCmd [::util::which clamdscan]
       foreach fn $fns {
-        if {$clamscanCmd ne "" && [file readable $fn]} {
+        if {$clamscanCmd ne "" && [ad_file readable $fn]} {
           if {[catch {exec $clamscanCmd $fn 2>@1} result]} {
             ns_log warning "[self] virus found:\n$result"
             return 1