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 -r1.21.2.1
--- openacs-4/packages/lars-blogger/www/entry-chunk.tcl	29 Jun 2004 10:18:35 -0000	1.21
+++ openacs-4/packages/lars-blogger/www/entry-chunk.tcl	29 Sep 2005 15:08:09 -0000	1.21.2.1
@@ -58,7 +58,11 @@
 
 
 set blog(edit_url) [export_vars -base "${package_url}entry-edit" { entry_id return_url }]
-set blog(delete_url) [export_vars -base "${package_url}entry-delete" { entry_id return_url }]
+if {$perma_p} {
+    set blog(delete_url) [export_vars -base "${package_url}entry-delete" { entry_id {return_url $package_url} }]
+} else {
+    set blog(delete_url) [export_vars -base "${package_url}entry-delete" { entry_id return_url }]
+}
 
 set blog(publish_url) [export_vars -base "${package_url}entry-publish" { entry_id return_url }]
 set blog(revoke_url) [export_vars -base "${package_url}entry-revoke" { entry_id return_url }]