Index: openacs-4/contrib/packages/classified-ads/tcl/ads-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/classified-ads/tcl/ads-procs.tcl,v
diff -u -r1.6 -r1.7
--- openacs-4/contrib/packages/classified-ads/tcl/ads-procs.tcl 24 Jul 2003 01:04:48 -0000 1.6
+++ openacs-4/contrib/packages/classified-ads/tcl/ads-procs.tcl 24 Jul 2003 01:14:44 -0000 1.7
@@ -104,16 +104,11 @@
set keyword_id [classified-ads::ads::get_category_id -ad_id $ad_id]
#
- # Get extra widgets that we need to display
- #
-
- set widget_list [db_list_of_ns_sets select_widgets {}]
-
# object_id, object_type, context_id, security_inherit_p, creation_user,
# creation_date, creation_ip, last_modified, modifying_user, modifying_ip,
# tree_sortkey, revision_id, title, item_id, description, publish_date,
# mime_type, nls_language, name, parent_id, ad_id
-
+ #
db_1row select_data {} -column_array row
set row(pretty_publish_date) [util_AnsiDatetoPrettyDate $row(publish_date)]
Index: openacs-4/contrib/packages/classified-ads/tcl/ads-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/classified-ads/tcl/ads-procs.xql,v
diff -u -r1.4 -r1.5
--- openacs-4/contrib/packages/classified-ads/tcl/ads-procs.xql 21 Jul 2003 05:23:56 -0000 1.4
+++ openacs-4/contrib/packages/classified-ads/tcl/ads-procs.xql 24 Jul 2003 01:14:44 -0000 1.5
@@ -43,27 +43,6 @@
-
-
-
- select cawv.*,
- aa.default_value,
- aa.attribute_name,
- aa.datatype
- from acs_attributes aa,
- ca_attribute_widget_values cawv,
- ca_attributes ca
- where aa.attribute_id = cawv.attribute_id and
- ca.attribute_id = aa.attribute_id and
- aa.object_type = :content_type and
- cawv.enabled_p = 't' and
- (ca.sitewide_p = 't' or
- ca.package_id = :package_id)
- order by aa.sort_order asc
-
-
-
-