Index: openacs-4/packages/dotlrn/www/spam.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/spam.tcl,v
diff -u -N -r1.14 -r1.15
--- openacs-4/packages/dotlrn/www/spam.tcl	5 Jul 2002 08:13:46 -0000	1.14
+++ openacs-4/packages/dotlrn/www/spam.tcl	11 Jul 2002 04:58:34 -0000	1.15
@@ -135,7 +135,7 @@
     "
 
     bulk_mail::new \
-        -package_id [site_nodes::get_child_package_id -package_key [bulk_mail::package_key]] \
+        -package_id [site_node_apm_integration::get_child_package_id -package_key [bulk_mail::package_key]] \
         -send_date [template::util::date::get_property linear_date $send_date] \
         -date_format "YYYY MM DD HH24 MI SS" \
         -from_addr $from \