eduardop
committed
on 04 Apr 06
work-in-progress
openacs-4/.../file-storage/www/folder-chunk.tcl (+3 -3)
84 84 if { [string equal $target_window_name ""] } {
85 85     set target_attr ""
86 86 } else {
87 87     set target_attr "target=\"$target_window_name\""
88 88 }
89 89
90 90 if {$delete_p} {
91 91     lappend actions "#file-storage.Delete_this_folder#" ${fs_url}folder-delete?[export_vars folder_id] "#file-storage.Delete_this_folder#"
92 92 }
93 93 if {$admin_p} {
94 94     lappend actions "#file-storage.Edit_Folder#" "${fs_url}folder-edit?folder_id=$folder_id" "#file-storage.Rename_this_folder#"
95 95     lappend actions "#file-storage.lt_Modify_permissions_on_1#" "${fs_url}permissions?[export_vars -override {{object_id $folder_id}} {{return_url "[ad_conn url]"}}]" "#file-storage.lt_Modify_permissions_on_1#"
96 96     if { $expose_rss_p } {
97 97         lappend actions "Configure RSS" "${fs_url}admin/rss-subscrs?folder_id=$folder_id" "Configure RSS"
98 98     }
99 99 }
100 100
101 101 #set n_past_filter_values [list [list "Yesterday" 1] [list [_ file-storage.last_week] 7] [list [_ file-storage.last_month] 30]]
102 102 set elements [list type [list label [_ file-storage.Type] \
103 103                              display_template {<img src="@contents.icon@"  border=0 alt="#file-storage.@contents.pretty_type@#" />@contents.pretty_type@} \
104                               orderby_desc {(sort_key =  0),pretty_type  desc} \
105                               orderby_asc {sort_key, pretty_type asc}] \
  104                             orderby_desc {sort_key_desc,fs_objects.pretty_type desc} \
  105                             orderby_asc {fs_objects.sort_key, fs_objects.pretty_type asc}] \
106 106                   name \
107 107                   [list label [_ file-storage.Name] \
108 108                        display_template {<a @target_attr@ href="@contents.file_url@"><if @contents.title@ nil>@contents.name@</a></if><else>@contents.title@</a><br/><if @contents.name@ ne @contents.title@><span style="color: \#999;">@contents.name@</span></if></else>} \
109 109                        orderby_desc {fs_objects.name desc} \
110 110                        orderby_asc {fs_objects.name asc}] \
111 111                   short_name \
112 112                   [list label [_ file-storage.Name] \
113 113                         hide_p 1 \
114 114                        display_template {<a href="@contents.download_url@">@contents.title@</a>} \
115 115                        orderby_desc {fs_objects.name desc} \
116 116                        orderby_asc {fs_objects.name asc}] \
117 117                   content_size_pretty \
118 118                   [list label [_ file-storage.Size] \
119 119                        display_template {@contents.content_size_pretty;noquote@} \
120 120                        orderby_desc {content_size desc} \
121 121                        orderby_asc {content_size asc}] \
122 122                   last_modified_pretty \
123 123                   [list label [_ file-storage.Last_Modified] \
124 124                        orderby_desc {last_modified_ansi desc} \
125 125                        orderby_asc {last_modified_ansi asc}] \