Index: openacs-4/packages/ecommerce/www/admin/products/one-subsubcategory.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/ecommerce/www/admin/products/one-subsubcategory.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/ecommerce/www/admin/products/one-subsubcategory.tcl	9 Mar 2004 00:59:51 -0000	1.3
+++ openacs-4/packages/ecommerce/www/admin/products/one-subsubcategory.tcl	15 Aug 2008 22:29:01 -0000	1.4
@@ -24,41 +24,24 @@
 
 ad_require_permission [ad_conn package_id] admin
 
-doc_body_append "[ad_admin_header "Products in $category_name: $subcategory_name: $subsubcategory_name"]
+set title "Products in $category_name: $subcategory_name: $subsubcategory_name"
+set context [list [list index Products] $title]
 
-<h2>Products in $category_name: $subcategory_name: $subsubcategory_name</h2>
-
-[ad_context_bar [list "../" "Ecommerce([ec_system_name])"] [list "index.tcl" "Products"] "Products in $category_name: $subcategory_name: $subsubcategory_name"]
-
-<hr>
-
-<ul>
-"
-
 set sql "select m.product_id, p.product_name, publisher_favorite_p
 from ec_subsubcategory_product_map m, ec_products p
 where m.product_id = p.product_id
 and m.subsubcategory_id= :subsubcategory_id
 order by product_name"
 
+set select_subsubcate_html ""
 db_foreach select_subsubcate $sql {
-
-    doc_body_append "<li><a href=\"one?[export_url_vars product_id]\">$product_name</a> "
+    set has_rows 1
+    append select_subsubcate_html "<li><a href=\"one?[export_url_vars product_id]\">$product_name</a> "
     if { $publisher_favorite_p == "t" } {
-	doc_body_append "This is a favorite. "
-    }
-    if { $publisher_favorite_p == "t" } {
-	doc_body_append " \[<a href=\"subsubcategory-property-toggle?publisher_favorite_p=f&[export_url_vars product_id category_id category_name subcategory_id subcategory_name subsubcategory_id subsubcategory_name]\">make it not be a favorite</a>\]"
+        append select_subsubcate_html "This is a favorite. \[<a href=\"subsubcategory-property-toggle?publisher_favorite_p=f&[export_url_vars product_id category_id category_name subcategory_id subcategory_name subsubcategory_id subsubcategory_name]\">make it not be a favorite</a>\]</li>"
     } else {
-	doc_body_append "\[<a href=\"subsubcategory-property-toggle?publisher_favorite_p=t&[export_url_vars product_id category_id category_name subcategory_id subcategory_name subsubcategory_id subsubcategory_name]\">make this a favorite</a>\]"
-    }
-    
+        append select_subsubcate_html "\[<a href=\"subsubcategory-property-toggle?publisher_favorite_p=t&[export_url_vars product_id category_id category_name subcategory_id subcategory_name subsubcategory_id subsubcategory_name]\">make this a favorite</a>\]</li>"
+    }    
 } if_no_rows {
-    
-    doc_body_append "There are no products in this subsubcategory.\n"
+    set has_rows 0
 }
-
-doc_body_append "</ul>
-
-[ad_admin_footer]
-"