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.2 -r1.3
--- openacs-4/packages/calendar/tcl/calendar-2-procs.tcl	3 Jun 2002 04:08:17 -0000	1.2
+++ openacs-4/packages/calendar/tcl/calendar-2-procs.tcl	3 Jun 2002 07:30:53 -0000	1.3
@@ -151,7 +151,8 @@
     } {
         return the item types
     } {
-        return [db_list_of_lists select_item_types {}]
+        return [concat [list [list {--} {}]] \
+                [db_list_of_lists select_item_types {}]]
     }
 
     ad_proc -public item_type_new {