Index: openacs-4/contrib/packages/project-manager/www/task-calendar.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/task-calendar.tcl,v
diff -u -r1.1.2.1 -r1.1.2.2
--- openacs-4/contrib/packages/project-manager/www/task-calendar.tcl	5 Aug 2004 00:03:45 -0000	1.1.2.1
+++ openacs-4/contrib/packages/project-manager/www/task-calendar.tcl	13 Aug 2004 18:57:34 -0000	1.1.2.2
@@ -24,24 +24,46 @@
 
 set title "Task calendar"
 set context [list $title]
+set header_stuff "
+<style type=\"text/css\">
+.calendar-item {
+    font-family: Arial, Helvetica, sans-serif;
+}
 
-set item_template "* <a href=\"task-one?task_id=\$task_id\">\$task_id</a> \$title"
+.calendar-item ul {
+    color: \#999;
+    display: inline;
+    padding-left: 0em;
+}
 
-set item_add_template ""
+.calendar-item li {
+    color: \#999;
+    display: inline;
+    font-size: 80%;
+}
 
-# set item_add_template "<a href=\"task-add&julian_date=\$julian_date\">(Add)</a></font>"
+.calendar-item p {
+    border-top: thin dotted grey;
+}
 
-switch -exact -- $view {
-    {month} {
-	set content [pm::calendar::one_month_display -user_id $user_id \
-                         -date $date \
-                         -prev_nav_template "<a href=\"?view=month&date=\$ansi_date&user_id=$user_id\">&lt;</a>" \
-                         -next_nav_template "<a href=\"?view=month&date=\$ansi_date&user_id=$user_id\">&gt;</a>" \
-                         -item_template "<font size=-2>$item_template</font>" \
-                         -day_template "<font size=-1><b>\$day_number</b></font>" \
-			 -item_add_template "<font size=-3>$item_add_template</font>" \
-                    ]
-    }
+.calendar-item strong {
+    color: red;
 }
 
+.calendar-item strike {
+    color: \#bbb;
+    text-decoration: line-through;
+}
+
+</style>"
+
+set return_url [ad_return_url]
+
+set content "<form method=\"post\" action=\"task-add-edit\"><input type=\"submit\" value=\"Edit Tasks\">[export_vars -form {return_url}]"
+append content [pm::calendar::one_month_display \
+                 -user_id $user_id \
+                 -date $date \
+                ]
+append content "</font>"
+
 ad_return_template