Index: openacs-4/packages/lorsm/www/delivery/view/index.vuh
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/delivery/view/index.vuh,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/lorsm/www/delivery/view/index.vuh	17 May 2005 17:03:40 -0000	1.2
+++ openacs-4/packages/lorsm/www/delivery/view/index.vuh	7 Jun 2006 14:05:45 -0000	1.3
@@ -4,11 +4,22 @@
     @cvs-id $Id$
 } {    
     { ims_item_id "" }
+    { man_id "" }
 }
- 
+
 # check if the nsv variable exists
 if {![nsv_exists delivery_vars [ad_conn session_id]]} {
-    ad_returnredirect [dotlrn_community::get_community_url [dotlrn_community::get_community_id -package_id [ad_conn package_id]]]
+    if {$man_id ne ""} {
+	db_1row manifest_info { *SQL* }
+	set content_root [fs::get_root_folder -package_id $fs_package_id]
+	if {[nsv_exists delivery_vars [ad_conn session_id]]} {
+	    nsv_unset delivery_vars [ad_conn session_id]
+	}
+	nsv_set delivery_vars [ad_conn session_id] [list]
+	nsv_lappend delivery_vars [ad_conn session_id] $content_root
+    } else {
+	ad_return_complaint 1 "[_ lorsm.Your_session_has_expired]"
+    }
 }
 
 if {[info exists ims_item_id]} {
@@ -76,6 +87,6 @@
    append page "The item is either not available on this server or it is not in a publishable state  "
    append page "Unpublished items can be viewed via the CMS interface if the CMS package is installed.<br>"
    append page "[ad_footer]"
-   doc_return 200 text/html $page
+   doc_return 404 text/html $page
 }