Index: openacs-4/packages/news/www/item.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news/www/item.tcl,v diff -u -r1.11 -r1.12 --- openacs-4/packages/news/www/item.tcl 2 Feb 2005 23:30:49 -0000 1.11 +++ openacs-4/packages/news/www/item.tcl 24 Feb 2005 18:03:05 -0000 1.12 @@ -16,8 +16,10 @@ context:onevalue item_exist_p:onevalue publish_title:onevalue + publish_lead:onevalue publish_date:onevalue publish_body:onevalue + publish_image:onevalue html_p:onevalue creator_link:onevalue comments:onevalue @@ -38,6 +40,7 @@ select item_id, live_revision, publish_title, + publish_lead, html_p, publish_date, '' || item_creator || '' as creator_link @@ -81,6 +84,14 @@ set comments "" } + # get image info, if any + set image_id [news_get_image_id $item_id] + if {![empty_string_p $image_id]} { + set publish_image "image/$image_id" + } else { + set publish_image {} + } + if {[permission::permission_p -object_id $item_id -privilege write] } { set edit_link "Revise" } else {