Index: openacs-4/packages/lors-central/lib/item-files.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lors-central/lib/item-files.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/lors-central/lib/item-files.tcl 17 May 2005 16:21:17 -0000 1.1 +++ openacs-4/packages/lors-central/lib/item-files.tcl 17 May 2005 22:58:13 -0000 1.2 @@ -24,7 +24,7 @@ set clip_url [export_vars -base "/clipboard/attach" {{object_id $file_id} clipboard_id}] set file_item_id [db_string get_file_item_id { } -default 0] set count [db_string get_revision_count { } -default 0] - set one_file_url [export_vars -base one-file {file_id res_id}] + set one_file_url [export_vars -base one-file {file_id res_id ims_item_id}] if {$main_file_p} { set main_file "Main File" } else { Index: openacs-4/packages/lors-central/www/one-file.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lors-central/www/one-file.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/lors-central/www/one-file.tcl 17 May 2005 16:21:19 -0000 1.1 +++ openacs-4/packages/lors-central/www/one-file.tcl 17 May 2005 22:58:36 -0000 1.2 @@ -10,6 +10,7 @@ {res_id ""} {name "" } {prev_file_id ""} + ims_item_id:notnull } # Checking swa privilege over lors-central @@ -95,5 +96,5 @@ } set return_url [ad_return_url] -set edit_url [export_vars -base "file-content-edit" {file_id return_url res_id man_id}] +set edit_url [export_vars -base "file-content-edit" {ims_item_id file_id return_url res_id man_id}] ad_return_template