Index: openacs-4/packages/file-storage/www/folder-contents.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/Attic/folder-contents.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/file-storage/www/folder-contents.tcl 27 Apr 2002 15:31:10 -0000 1.2 +++ openacs-4/packages/file-storage/www/folder-contents.tcl 18 May 2002 20:04:08 -0000 1.3 @@ -68,7 +68,7 @@ lappend table_def [list name Name {fs_objects.name $order} "\$name"] lappend table_def [list folder_name Folder {} "\$folder_name"] lappend table_def {type Type {fs_objects.type $order} {c}} -lappend table_def {size Size {fs_objects.content_size $order} {[ad_decode $type Folder "$content_size item[ad_decode $content_size 1 {} s]" URL {} "$content_size byte[ad_decode $content_size 1 {} s]"]}} +lappend table_def {content_size Size {fs_objects.content_size $order} {[ad_decode $type Folder "$content_size item[ad_decode $content_size 1 {} s]" URL {} "$content_size byte[ad_decode $content_size 1 {} s]"]}} lappend table_def {last_modified {Last Modified} {fs_objects.last_modified $order} {[util_AnsiDatetoPrettyDate $last_modified]}} if {$recurse_p} {