Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/news-aggregator/www/aggregator-tabs.adp'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/news-aggregator/www/aggregator-tabs.tcl'. Fisheye: No comparison available. Pass `N' to diff? Index: openacs-4/packages/news-aggregator/www/aggregator.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-aggregator/www/aggregator.adp,v diff -u -r1.2.2.1 -r1.2.2.2 --- openacs-4/packages/news-aggregator/www/aggregator.adp 28 Dec 2005 17:55:43 -0000 1.2.2.1 +++ openacs-4/packages/news-aggregator/www/aggregator.adp 4 Jan 2006 05:31:08 -0000 1.2.2.2 @@ -1,7 +1,12 @@ + @page_title@ @context@ aggregator.aggregator_name + +

+Edit attributes for this aggregator: +

Index: openacs-4/packages/news-aggregator/www/aggregator.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-aggregator/www/aggregator.tcl,v diff -u -r1.4.2.2 -r1.4.2.3 --- openacs-4/packages/news-aggregator/www/aggregator.tcl 1 Jan 2006 19:44:38 -0000 1.4.2.2 +++ openacs-4/packages/news-aggregator/www/aggregator.tcl 4 Jan 2006 05:31:08 -0000 1.4.2.3 @@ -19,14 +19,10 @@ } set page_title "Edit Aggregator Info" +array set ag_info [news_aggregator::aggregator::aggregator_info -aggregator_id $aggregator_id] +set context [list [list "." "$ag_info(aggregator_name)"] "$page_title"] -if { [exists_and_not_null context] } { - lappend context "$page_title" -} else { - set context [list $page_title] -} - -ad_form -name aggregator -action aggregator -select_query_name select_aggregator -form { +ad_form -name aggregator -select_query_name select_aggregator -form { {aggregator_id:integer(hidden),key} {aggregator_name:text {label "Name"} Fisheye: Tag 1.1.2.3 refers to a dead (removed) revision in file `openacs-4/packages/news-aggregator/www/manage.adp'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.1.2.2 refers to a dead (removed) revision in file `openacs-4/packages/news-aggregator/www/manage.tcl'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/news-aggregator/www/permissions.adp'. Fisheye: No comparison available. Pass `N' to diff? Fisheye: Tag 1.1 refers to a dead (removed) revision in file `openacs-4/packages/news-aggregator/www/permissions.tcl'. Fisheye: No comparison available. Pass `N' to diff?