Index: openacs-4/packages/lors/tcl/lors-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lors/tcl/lors-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/lors/tcl/lors-procs.tcl	30 Nov 2006 16:26:04 -0000	1.5
+++ openacs-4/packages/lors/tcl/lors-procs.tcl	7 Mar 2007 03:10:53 -0000	1.6
@@ -44,15 +44,16 @@
                     # FIXME either 1) make this magically work
                     # or 2) find the assessment_id and use 
                     # page anchor
-		    set assessment_id [db_string get_assessment_id "select ci.item_id, m.assessment_id from cr_items ci, cr_revisions cr, as_assessment_section_map m where cr.item_id=:object_id and cr.revision_id=m.section_id and ci.latest_revision=assessment_id"]
+		    #set assessment_id [db_string get_assessment_id "select ci.item_id, m.assessment_id from cr_items ci, cr_revisions cr, as_assessment_section_map m where cr.item_id=:object_id and cr.revision_id=m.section_id and ci.latest_revision=assessment_id"]
+		    set assessment_id ""
                     return [export_vars \
                                 -base ../assessment/asm-admin/one-a \
                                 {assessment_id}]
                 }
                 "::xowiki::Page" {
+		    set url [::xowiki::Package get_url_from_id -item_id $object_id]
 	            set page [::xowiki::Package instantiate_page_from_id -item_id $object_id]
-		    return [$page make_link -privilege public -url [$page name] $page edit ""]
-
+		    return [$page make_link -privilege public -url $url $page edit ""]		    
                 }
             }