Index: openacs-4/packages/logger/lib/entries.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/logger/lib/entries.tcl,v
diff -u -r1.10.2.6 -r1.10.2.7
--- openacs-4/packages/logger/lib/entries.tcl 27 Jun 2005 20:38:10 -0000 1.10.2.6
+++ openacs-4/packages/logger/lib/entries.tcl 10 Feb 2006 00:47:23 -0000 1.10.2.7
@@ -153,14 +153,16 @@
label {}
display_template {
-
+ alt="\#logger.Edit\#" border="0">
}
}
project_id {
- display_template {@entries.project_name@}
+ display_template {
+ @entries.project_name@@entries.project_name@
+ }
label "[_ logger.Project]"
hide_p {[ad_decode [exists_and_not_null project_id] 1 1 0]}
}
@@ -554,9 +556,13 @@
set my_base_url $base_url
set my_project_manager_url $project_manager_url
+ if { [logger::util::project_manager_linked_p] } {
+ set project_item_id [logger::util::project_manager_project_id -project_id $project_id]
+ set project_url [export_vars -base "[logger::util::project_manager_url]one" {project_item_id}]
+ } else {
+ set project_url ""
+ }
- set project_item_id [logger::util::project_manager_project_id -project_id $project_id]
- set project_url [export_vars -base "[logger::util::project_manager_url]one" {project_item_id}]
if { ![empty_string_p $tree_id] && ![empty_string_p $category_id] } {
lappend row_categories($tree_id) $category_id
}