Index: openacs-4/packages/file-storage/www/file.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/file.tcl,v
diff -u -r1.39.2.4 -r1.39.2.5
--- openacs-4/packages/file-storage/www/file.tcl	1 Jul 2019 14:47:07 -0000	1.39.2.4
+++ openacs-4/packages/file-storage/www/file.tcl	13 Oct 2022 10:19:34 -0000	1.39.2.5
@@ -194,7 +194,7 @@
     set author_link [acs_community_member_link -user_id $author_id -label $author]
 }
 
-if { [apm_package_installed_p "general-comments"] && [parameter::get -parameter "GeneralCommentsP" -package_id [ad_conn package_id]] } {
+if { [namespace which ::general_comments_create_link] ne "" && [parameter::get -parameter "GeneralCommentsP" -package_id [ad_conn package_id]] } {
     set gc_link [general_comments_create_link $file_id $return_url]
     set gc_comments [general_comments_get_comments $file_id $return_url]
 } else {
Index: openacs-4/packages/file-storage/www/index.vuh
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/index.vuh,v
diff -u -r1.6.2.1 -r1.6.2.2
--- openacs-4/packages/file-storage/www/index.vuh	7 Feb 2022 15:25:59 -0000	1.6.2.1
+++ openacs-4/packages/file-storage/www/index.vuh	13 Oct 2022 10:19:34 -0000	1.6.2.2
@@ -30,7 +30,7 @@
     ad_script_abort
 }
 
-if {[apm_package_installed_p views]} {
+if {[namespace which ::views::record_view] ne ""} {
     views::record_view -object_id $file_item_id -viewer_id $user_id
 }
 
Index: openacs-4/packages/file-storage/www/download/index.vuh
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/download/index.vuh,v
diff -u -r1.12 -r1.12.2.1
--- openacs-4/packages/file-storage/www/download/index.vuh	7 Aug 2017 23:48:11 -0000	1.12
+++ openacs-4/packages/file-storage/www/download/index.vuh	13 Oct 2022 10:19:34 -0000	1.12.2.1
@@ -29,8 +29,8 @@
 set user_id [ad_conn user_id]
 permission::require_permission -party_id $user_id -object_id $version_id -privilege read
 
-if {[apm_package_installed_p views]} {
-	views::record_view -object_id $file_id -viewer_id $user_id
+if {[namespace which ::views::record_view] ne ""} {
+    views::record_view -object_id $file_id -viewer_id $user_id
 }
 
 cr_write_content -revision_id $version_id