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.24 -r1.25
--- openacs-4/packages/news/tcl/news-procs.tcl 17 Oct 2006 18:43:46 -0000 1.24
+++ openacs-4/packages/news/tcl/news-procs.tcl 17 Oct 2006 23:16:31 -0000 1.25
@@ -398,9 +398,9 @@
append new_content "\n\n$body"
append html_content "
[ad_html_text_convert "$body"]"
}
- append new_content "\n\n[string range - 70]"
+ append new_content "\n\n[string repeat - 70]"
append new_content "\n\n[parameter::get_from_package_key -package_key acs-kernel -parameter SystemURL][news_util_get_url $news_package_id]]item?item_id=$item_id \n\n"
- append html_content "
[ad_html_text_convert "Read more about it at \n [parameter::get_from_package_key -package_key acs-kernel -parameter SystemURL][news_util_get_url $news_package_id]item?item_id=$item_id"]
"
+ append html_content "
[ad_html_text_convert "