Index: openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl,v
diff -u -N -r1.23 -r1.24
--- openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl	2 Apr 2002 06:13:47 -0000	1.23
+++ openacs-4/packages/calendar-portlet/tcl/calendar-portlet-procs.tcl	11 Apr 2002 19:51:02 -0000	1.24
@@ -50,7 +50,7 @@
 
     ad_proc -public link {
     } {
-	return "calendar"
+	return [get_pretty_name]
     }
 
     ad_proc -public add_self_to_page { 
@@ -86,12 +86,6 @@
 	  @author arjun@openforce.net
 	  @creation-date Sept 2001
     } {
-        ## YOWSA (ben)
-        # calendar portlet should NOT be creating and deleting calendars!
-        # I've taken out a chunk of code here that was removing calendars. No way! (ben).
-        
-        # get rid of this portal element
-        # This automatically removes all element params
         portal::remove_element_or_remove_id -portal_id $portal_id -portlet_name [my_name] -key calendar_id -value_id $package_id
     }