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.31.2.2 -r1.31.2.3 --- openacs-4/packages/file-storage/www/folder-chunk.tcl 18 Jul 2005 13:57:54 -0000 1.31.2.2 +++ openacs-4/packages/file-storage/www/folder-chunk.tcl 18 Jul 2005 19:03:18 -0000 1.31.2.3 @@ -73,6 +73,13 @@ set expose_rss_p [parameter::get -parameter ExposeRssP -default 0] +set target_window_name [parameter::get -parameter DownloadTargetWindowName -default ""] +if { [string equal $target_window_name ""] } { + set target_attr "" +} else { + set target_attr "target=\"$target_window_name\"" +} + if {$delete_p} { lappend actions "\#file-storage.Delete_this_folder\#" ${fs_url}folder-delete?[export_vars folder_id] "\#file-storage.Delete_this_folder\#" } @@ -87,12 +94,12 @@ #set n_past_filter_values [list [list "Yesterday" 1] [list [_ file-storage.last_week] 7] [list [_ file-storage.last_month] 30]] set elements [list type [list label [_ file-storage.Type] \ - display_template {#file-storage.@contents.pretty_type@#@contents.pretty_type@} \ + display_template {#file-storage.@contents.pretty_type@#@contents.pretty_type@} \ orderby_desc {(sort_key = 0),pretty_type desc} \ orderby_asc {sort_key, pretty_type asc}] \ name \ [list label [_ file-storage.Name] \ - display_template {@contents.name@@contents.title@
@contents.name@
} \ + display_template {@contents.name@@contents.title@
@contents.name@
} \ orderby_desc {fs_objects.name desc} \ orderby_asc {fs_objects.name asc}] \ short_name \ @@ -157,6 +164,7 @@ } } } \ + -pass_properties [list target_attr] \ -filters { folder_id {hide_p 1} } \