Index: openacs-4/packages/bm-portlet/bm-portlet.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bm-portlet/bm-portlet.info,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/bm-portlet/bm-portlet.info	29 Oct 2002 18:02:48 -0000	1.4
+++ openacs-4/packages/bm-portlet/bm-portlet.info	12 Nov 2002 08:45:54 -0000	1.5
@@ -30,7 +30,7 @@
             <file type="content_page" path="www/bm-portlet.tcl"/>
         </files>
         <parameters>
-            <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="PrettyName"  default="#bm-portlet.pretty_name#" description="Name of the bulk mail portlet to display everywhere"/>
+            <parameter datatype="string"  min_n_values="1"  max_n_values="1"  name="pretty_name"  default="#bm-portlet.pretty_name#" description="Name of the bulk mail portlet to display everywhere"/>
         </parameters>
 
     </version>
Index: openacs-4/packages/bm-portlet/tcl/bm-portlet-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bm-portlet/tcl/bm-portlet-procs.tcl,v
diff -u -N -r1.4 -r1.5
--- openacs-4/packages/bm-portlet/tcl/bm-portlet-procs.tcl	23 Oct 2002 12:28:47 -0000	1.4
+++ openacs-4/packages/bm-portlet/tcl/bm-portlet-procs.tcl	12 Nov 2002 08:45:54 -0000	1.5
@@ -38,7 +38,7 @@
 
     ad_proc -public get_pretty_name {
     } {
-        return [parameter::get -parameter pretty_name]
+        return [parameter::get_from_package_key -package_key [my_package_key] -parameter pretty_name]
     }
 
     ad_proc -public link {