Index: openacs-4/packages/news/tcl/news-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/tcl/news-procs.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/news/tcl/news-procs.tcl 25 Oct 2001 11:39:29 -0000 1.2 +++ openacs-4/packages/news/tcl/news-procs.tcl 25 Oct 2001 12:16:33 -0000 1.3 @@ -75,6 +75,8 @@ set package_id [apm_package_id_from_key $package_key] + set url_stub "" + db_0or1row get_url_stub " select site_node__url(node_id) as url_stub from site_nodes Index: openacs-4/packages/news/www/index.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/index.adp,v diff -u -r1.3 -r1.4 --- openacs-4/packages/news/www/index.adp 25 Oct 2001 11:39:29 -0000 1.3 +++ openacs-4/packages/news/www/index.adp 25 Oct 2001 12:16:33 -0000 1.4 @@ -19,12 +19,12 @@

- + Index: openacs-4/packages/news/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/index.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/news/www/index.tcl 16 Oct 2001 18:18:36 -0000 1.3 +++ openacs-4/packages/news/www/index.tcl 25 Oct 2001 12:16:33 -0000 1.4 @@ -42,8 +42,8 @@ # switch for showing interface to site-wide-search for news set allow_search_p [ad_parameter ShowSearchInterfaceP "news" 1] +set search_url [news_util_get_url search] - # view switch in live | archived news if { [string equal "live" $view] } {
Search -
search> +