Index: openacs-4/packages/attendance/lib/cp-attendance.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/attendance/lib/cp-attendance.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/attendance/lib/cp-attendance.adp	19 Jun 2005 06:05:05 -0000	1.2
+++ openacs-4/packages/attendance/lib/cp-attendance.adp	6 Aug 2005 10:09:17 -0000	1.3
@@ -1,6 +1,9 @@
 	<listtemplate name="session_list"></listtemplate>
 	<ul>
 		<li><a href="@calendar_url@cal-item-new?item_type_id=@item_type_id@&calendar_id=@calendar_id@&view=day&return_url=@current_url@" >Create New Session</a>
+
+<if @show_non_session_calendar_links@>
 		<li><a href="@calendar_url@cal-item-new?calendar_id=@calendar_id@&view=day" target="blank">Create Calendar Event(Any Type)</a>
 		<li><a href="@calendar_url@calendar-item-types?calendar_id=@calendar_id@" target="blank">Add New Event Type</a> - Experts only!
+</if>
 	</ul>
Index: openacs-4/packages/attendance/lib/cp-attendance.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/attendance/lib/cp-attendance.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/attendance/lib/cp-attendance.tcl	19 Jul 2005 10:33:10 -0000	1.7
+++ openacs-4/packages/attendance/lib/cp-attendance.tcl	6 Aug 2005 10:09:17 -0000	1.8
@@ -9,6 +9,10 @@
     set community_id [dotlrn_community::get_community_id]
 }
 
+if {![info exists show_non_session_calendar_links]} {
+    set show_non_session_calendar_links 1
+}
+
 set attendance_package_id [db_string "getattpack" ""]
 set attendance_url [apm_package_url_from_id $attendance_package_id]
 set calendar_id [dotlrn_calendar::get_group_calendar_id -community_id $community_id]