Index: openacs-4/contrib/packages/classified-ads/www/admin/ad-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/classified-ads/www/admin/ad-new.tcl,v
diff -u -N -r1.4 -r1.5
--- openacs-4/contrib/packages/classified-ads/www/admin/ad-new.tcl	19 Jul 2003 01:48:45 -0000	1.4
+++ openacs-4/contrib/packages/classified-ads/www/admin/ad-new.tcl	24 Jul 2003 01:04:48 -0000	1.5
@@ -60,8 +60,12 @@
 }
 
 # Get extra custom widgets, if any
-classified-ads::widgets::get_widget_params -content_type "ca_ad" -form_id ad
 
+classified-ads::widgets::get_widget_params \
+	-content_type "ca_ad" \
+	-form_id ad \
+	-keyword_id $keyword_id
+
 set context [list [list "ads" "Ads"] $title]
 
 ad_return_template