Index: openacs-4/packages/contacts/lib/history-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/contacts/lib/history-portlet.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/contacts/lib/history-portlet.tcl	28 Oct 2005 17:57:18 -0000	1.2
+++ openacs-4/packages/contacts/lib/history-portlet.tcl	20 Feb 2006 22:01:02 -0000	1.3
@@ -3,4 +3,7 @@
 	set $optional_param {}
     }
 }
-set portlet_layout [parameter::get -parameter "DefaultPortletLayout"]
\ No newline at end of file
+set package_url [ad_conn package_url]
+set portlet_layout [parameter::get -parameter "DefaultPortletLayout"]
+
+set history_url "[contact::url -party_id ${party_id}]history"