Index: openacs-4/packages/news-portlet/www/summary.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/news-portlet/www/summary.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/news-portlet/www/summary.tcl	4 Dec 2002 09:55:27 -0000	1.2
+++ openacs-4/packages/news-portlet/www/summary.tcl	23 Oct 2003 09:19:34 -0000	1.3
@@ -31,10 +31,12 @@
        publish_title,
        html_p,
        publish_date,
-       '<a href=/shared/community-member?user_id=' || creation_user || '>' || item_creator ||  '</a>' as creator_link
+       creation_user,
+       item_creator
 from   news_items_live_or_submitted
 where  item_id = :item_id"]
 
+set creator_url [acs_community_member_url -user_id $creation_user]
 
 if { $item_exist_p } {
 
@@ -71,29 +73,9 @@
 
 set more_link ""
 if { [string length $publish_body] > 1000 } {
-    set publish_body "[string range $publish_body 0 1000]"
-    set more_link "......<a href=$url>read more</a>"
+    set publish_body [string_truncate -len 1000 -- $publish_body]
+    set more_link "<br><b>&raquo;</b> <a href=\"$url\">[_ news-portlet.Read_more]</a>"
 }
 
 set publish_body [ad_convert_to_html  -html_p $html_p $publish_body]
 
-
-
-
-ad_return_template
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-