Index: openacs-4/packages/acs-content-repository/tcl/acs-content-repository-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/acs-content-repository-procs.tcl,v
diff -u -r1.13.2.3 -r1.13.2.4
--- openacs-4/packages/acs-content-repository/tcl/acs-content-repository-procs.tcl	28 Dec 2021 14:44:20 -0000	1.13.2.3
+++ openacs-4/packages/acs-content-repository/tcl/acs-content-repository-procs.tcl	26 Feb 2024 09:54:05 -0000	1.13.2.4
@@ -79,7 +79,7 @@
     }
 }
 
-ad_proc -private cr_check_orphaned_files {
+ad_proc -private -deprecated cr_check_orphaned_files {
     -delete:boolean
     {-mtime ""}
 } {
@@ -101,7 +101,7 @@
     set root_length [string length $cr_root]
     set result ""
 
-    set cmd [list exec find $cr_root/ -type f]
+    set cmd [list exec [util::which find] $cr_root/ -type f]
     if {$mtime ne ""} {lappend cmd -mtime $mtime}
     foreach f [split [{*}$cmd] \n] {
         set name [string range $f $root_length end]