Index: openacs-4/packages/acs-content-repository/tcl/image-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/tcl/image-procs.tcl,v
diff -u -r1.18.2.6 -r1.18.2.7
--- openacs-4/packages/acs-content-repository/tcl/image-procs.tcl	20 Apr 2023 13:34:18 -0000	1.18.2.6
+++ openacs-4/packages/acs-content-repository/tcl/image-procs.tcl	25 Feb 2024 10:40:35 -0000	1.18.2.7
@@ -251,10 +251,10 @@
     @author Dave Bauer (dave@solutiongrove.com)
     @creation-date 2006-08-27
 } {
-    return [parameter::get \
-                -parameter ImageMagickIdentifyBinary \
-                -package_id [apm_package_id_from_key acs-content-repository] \
-                -default "/usr/bin/identify"]
+    return [::util::which [parameter::get \
+                               -parameter ImageMagickIdentifyBinary \
+                               -package_id [apm_package_id_from_key acs-content-repository] \
+                               -default "identify"]]
 }
 
 ad_proc -public image::convert_binary {
@@ -264,10 +264,10 @@
     @author Dave Bauer (dave@solutiongrove.com)
     @creation-date 2006-08-27
 } {
-    return [parameter::get \
-                -parameter ImageMagickConvertBinary \
-                -package_id [apm_package_id_from_key acs-content-repository] \
-                -default "/usr/bin/convert"]
+    return [::util::which [parameter::get \
+                               -parameter ImageMagickConvertBinary \
+                               -package_id [apm_package_id_from_key acs-content-repository] \
+                               -default "convert"]]
 }
 
 if {[ns_info name] eq "NaviServer"} {