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 {@contents.pretty_type@} \
+ display_template {@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}
} \