Index: openacs-4/packages/project-manager/lib/mail-portlet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/lib/mail-portlet.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/project-manager/lib/mail-portlet.tcl 4 Oct 2005 16:51:11 -0000 1.1 +++ openacs-4/packages/project-manager/lib/mail-portlet.tcl 14 Oct 2005 17:58:35 -0000 1.2 @@ -7,12 +7,17 @@ # @creation-date 2005-05-01 set default_layout_url [parameter::get -parameter DefaultPortletLayoutP] +set dotlrn_installed_p [apm_package_installed_p dotlrn] -set community_id [dotlrn_community::get_community_id] -if { ![empty_string_p $community_id] } { - set package_id [dotlrn_community::get_package_id_from_package_key \ - -package_key project-manager \ - -community_id $community_id] +if { $dotlrn_installed_p } { + set community_id [dotlrn_community::get_community_id] + if { ![empty_string_p $community_id] } { + set package_id [dotlrn_community::get_package_id_from_package_key \ + -package_key project-manager \ + -community_id $community_id] + } else { + set package_id [ad_conn package_id] + } } else { set package_id [ad_conn package_id] }