Index: openacs-4/packages/lars-blogger/www/entry-chunk.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/entry-chunk.adp,v
diff -u -r1.27.2.1 -r1.27.2.2
--- openacs-4/packages/lars-blogger/www/entry-chunk.adp	24 Sep 2005 01:18:02 -0000	1.27.2.1
+++ openacs-4/packages/lars-blogger/www/entry-chunk.adp	6 Apr 2007 07:52:26 -0000	1.27.2.2
@@ -71,7 +71,7 @@
     <a name="comment@comments.comment_id@"></a>
     <h3 class="lars_blogger_comment_title">@comments.title@</h3>
     <p class="lars_blogger_comment_text">@comments.content;noquote@</p>
-    <p><if @comments.trackback_p@ eq "f">#lars-blogger.by_commentsauthor#</if><else>#lars-blogger.Trackback_from# <a href="@comments.trackback_url@" title="@comments.trackback_name@">@comments.trackback_name@</a></else> #lars-blogger.lt_on_commentspretty_dat#</p>
+    <p><if @comments.trackback_p@ eq "f">#lars-blogger.by_commentsauthor#</if><else>#lars-blogger.Trackback_from# <a href="@comments.trackback_url@" title="@comments.trackback_name@">@comments.trackback_name@</a></else> #lars-blogger.lt_on_commentspretty_dat#<if @admin_p@ eq 1 or @comments.creation_user@ eq @user_id@> | <a href="@general_comments_package_url@comment-edit?comment_id=@comments.comment_id@&return_url=@comment_return_url@">Edit</a> | <a href="@general_comments_package_url@delete?comment_id=@comments.comment_id@&return_url=@comment_return_url@">Delete</a></if></p>
   </multiple>
   <center><a href="@blog.comment_add_url@" title="Comment on this entry">#lars-blogger.Add_comment#</a></center>
 </if>
Index: openacs-4/packages/lars-blogger/www/entry-chunk.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/www/entry-chunk.tcl,v
diff -u -r1.21.2.2 -r1.21.2.3
--- openacs-4/packages/lars-blogger/www/entry-chunk.tcl	7 Oct 2005 08:20:21 -0000	1.21.2.2
+++ openacs-4/packages/lars-blogger/www/entry-chunk.tcl	6 Apr 2007 07:52:26 -0000	1.21.2.3
@@ -24,7 +24,6 @@
     set show_comments_p $perma_p
 }
 
-
 # Maybe package_id is supplied, but maybe not
 if { ![info exists package_id] } {
     set package_id [ad_conn package_id]
@@ -51,6 +50,8 @@
 
 set entry_id $blog(entry_id)
 
+set admin_p [permission::permission_p -object_id $package_id -privilege admin -party_id $user_id]
+
 lars_blogger::entry::htmlify \
     -max_content_length $max_content_length \
     -more [ad_decode [ad_return_url] $blog(permalink_url) {} " <a href=\"[ad_quotehtml $blog(permalink_url)]\">Continued...</a>"] \
@@ -83,3 +84,5 @@
 set blog(posted_time_pretty) [util::age_pretty \
                                  -timestamp_ansi $blog(entry_date_ansi) \
                                  -sysdate_ansi $blog(sysdate_ansi)]
+
+set comment_return_url "${package_url}flush-cache?[export_vars { return_url }]"
\ No newline at end of file