Index: openacs-4/contrib/obsolete-packages/ticket-tracker-lite/www/ticket.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/ticket-tracker-lite/www/ticket.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/contrib/obsolete-packages/ticket-tracker-lite/www/ticket.tcl	8 Feb 2002 07:27:34 -0000	1.3
+++ openacs-4/contrib/obsolete-packages/ticket-tracker-lite/www/ticket.tcl	19 Mar 2002 06:49:29 -0000	1.4
@@ -15,7 +15,7 @@
 # 1) Get the ticket info
 #
 
-db_1row get_one_ticket {
+if ![db_0or1row get_one_ticket {
     select 
         t.area_id,
         a.name as area_name,
@@ -33,11 +33,14 @@
     where a.context_id = :package_id 
     and t.ticket_id = :ticket_id
     and t.area_id = a.area_id
-}
+}] then { ad_returnredirect "ticket-none" }
 
+
 set title "Ticket $ticket_id"
-set navbar_list [ttl_navbar_list [list [list "prefs-ae?area_id=$area_id" "$area_name"]]]
+set navbar_list [ad_context_bar [list "prefs-ae?area_id=$area_id" "$area_name"] $title]
 
+#set navbar_list [ad_context_bar [list [list "prefs-ae?area_id=$area_id" "$area_name"] $title]]
+
 set message [ttl_format_text_for_display -format $message_format -wrap 60 $message]
 
 #
@@ -87,5 +90,8 @@
 set area_optionlist     [ttl_area_optionlist $area_id]
 set priority_optionlist [ttl_priority_optionlist $priority]
 set status_optionlist   [ttl_status_optionlist $status]
-ns_log Notice "vinodk: dead: $deadline"
 set deadline_widget     [ad_dateentrywidget deadline $deadline]
+
+db_multirow files get_files "select i.name, r.mime_type, r.revision_id, i.item_id from cr_items i, cr_revisions r where i.parent_id = :ticket_id and i.item_id = r.item_id"
+
+set return_url "ticket?ticket_id=$ticket_id"