Index: openacs-4/packages/file-storage/www/folder-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-chunk.tcl,v diff -u -r1.18 -r1.19 --- openacs-4/packages/file-storage/www/folder-chunk.tcl 15 Feb 2004 01:41:17 -0000 1.18 +++ openacs-4/packages/file-storage/www/folder-chunk.tcl 15 Feb 2004 15:28:09 -0000 1.19 @@ -17,8 +17,10 @@ ad_script_abort } -permission::require_permission -party_id [ad_conn user_id] -object_id $folder_id -privilege "read" +set viewing_user_id [ad_conn user_id] +permission::require_permission -party_id $viewing_user_id -object_id $folder_id -privilege "read" + if {![exists_and_not_null n_past_days]} { set n_past_days 99999 }