Index: openacs-4/packages/calendar/tcl/calendar-2-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar/tcl/Attic/calendar-2-procs.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/calendar/tcl/calendar-2-procs.tcl	2 Jul 2002 21:17:07 -0000	1.4
+++ openacs-4/packages/calendar/tcl/calendar-2-procs.tcl	9 Jul 2002 20:19:24 -0000	1.5
@@ -185,9 +185,9 @@
     }
 
     ad_proc -public attachments_enabled_p {} {
-        check if attachments enabled
-    } {
-        return [apm_package_registered_p attachments]        
+        set package_id [site_nodes::child_package_exists_p \
+            -package_key attachments
+        ]
     }
 
 }