Index: openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl,v
diff -u -N -r1.105 -r1.106
--- openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	19 Feb 2018 19:00:23 -0000	1.105
+++ openacs-4/packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl	21 Jun 2018 13:11:04 -0000	1.106
@@ -20,22 +20,26 @@
         return [apm_package_id_from_key acs-mail-lite]
     }
     
-    ad_proc -public get_parameter {
+    ad_proc -deprecated -public get_parameter {
         -name:required
         {-default ""}
     } {
         Returns an apm-parameter value of this package
+
+        Deprecated: just a wrapper for parameter::get
+
         @option name parameter name
         @option default default parameter value
         @return apm-parameter value of this package
+        @see parameter::get
     } {
         return [parameter::get -package_id [get_package_id] -parameter $name -default $default]
     }
     
     ad_proc -private mail_dir {} {
         @return incoming mail directory to be scanned for bounces
     } {
-        return [get_parameter -name "BounceMailDir"]
+        return [parameter::get -package_id [get_package_id] -parameter "BounceMailDir" -default ""]
     }
     
     #---------------------------------------