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.3 -r1.4
--- openacs-4/packages/calendar/tcl/calendar-2-procs.tcl	3 Jun 2002 07:30:53 -0000	1.3
+++ openacs-4/packages/calendar/tcl/calendar-2-procs.tcl	2 Jul 2002 21:17:07 -0000	1.4
@@ -184,4 +184,10 @@
         }
     }
 
+    ad_proc -public attachments_enabled_p {} {
+        check if attachments enabled
+    } {
+        return [apm_package_registered_p attachments]        
+    }
+
 }