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.49.2.1 -r1.49.2.2 --- openacs-4/packages/file-storage/www/folder-chunk.tcl 12 Sep 2015 11:06:19 -0000 1.49.2.1 +++ openacs-4/packages/file-storage/www/folder-chunk.tcl 22 May 2016 19:27:19 -0000 1.49.2.2 @@ -13,14 +13,14 @@ page_num } -if {(![info exists folder_id] || $folder_id eq "")} { +if {![info exists folder_id] || $folder_id eq ""} { ad_return_complaint 1 [_ file-storage.lt_bad_folder_id_folder_] ad_script_abort } -if {(![info exists allow_bulk_actions] || $allow_bulk_actions eq "")} { +if {![info exists allow_bulk_actions] || $allow_bulk_actions eq ""} { set allow_bulk_actions "0" } -if { (![info exists category_id] || $category_id eq "") } { +if { ![info exists category_id] || $category_id eq "" } { set category_id "" } set viewing_user_id [ad_conn user_id] @@ -50,7 +50,7 @@ set content_size_total 0 -if {(![info exists format] || $format eq "")} { +if {![info exists format] || $format eq ""} { set format table } @@ -181,7 +181,7 @@ concat $elements [list views [list label "Views"]] } -if {(![info exists return_url] || $return_url eq "")} { +if {![info exists return_url] || $return_url eq ""} { set return_url [export_vars -base "index" {folder_id}] } set vars_to_export [list return_url]