Index: openacs-4/packages/lars-blogger/tcl/pinds-blog-entry-sc-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lars-blogger/tcl/pinds-blog-entry-sc-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/lars-blogger/tcl/pinds-blog-entry-sc-procs.tcl	28 Aug 2003 09:41:55 -0000	1.3
+++ openacs-4/packages/lars-blogger/tcl/pinds-blog-entry-sc-procs.tcl	11 Dec 2003 21:40:05 -0000	1.4
@@ -34,11 +34,7 @@
     @creation-date 2002-11-18
 } {
 
-    db_1row get_url_stub "
-        select site_node__url(node_id) as url_stub
-        from site_nodes s, pinds_blog_entries e
-        where e.entry_id = :object_id
-		and s.object_id = e.package_id"
+    db_1row get_url_stub {}
 
     set url "${url_stub}one-entry?entry_id=$object_id"