Index: openacs-4/packages/news/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/index.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/news/www/index.tcl 24 Feb 2005 13:33:23 -0000 1.12
+++ openacs-4/packages/news/www/index.tcl 24 Feb 2005 18:03:05 -0000 1.13
@@ -47,7 +47,7 @@
# view switch in live | archived news
if { [string equal "live" $view] } {
- set title "[_ news.News]"
+ set title [apm_instance_name_from_id $package_id]
set view_clause [db_map view_clause_live]
if { [db_string archived_p "
@@ -63,7 +63,7 @@
} else {
- set title "[_ news.News_Archive]"
+ set title [apm_instance_name_from_id $package_id]
set view_clause [db_map view_clause_archived]
if { [db_string live_p "
@@ -104,13 +104,13 @@
if { $count < [expr $start + $max_dspl] } {
set next_start ""
} else {
- set next_start "[_ news.next]"
+ set next_start "Next"
}
if { $start == 1 } {
set prev_start ""
} else {
- set prev_start "[_ news.prev]"
+ set prev_start "Previous"
}
if { ![empty_string_p $next_start] && ![empty_string_p $prev_start] } {