Index: openacs-4/packages/file-storage/www/folder-chunk.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-chunk.adp,v
diff -u -r1.10.2.5 -r1.10.2.6
--- openacs-4/packages/file-storage/www/folder-chunk.adp 17 Feb 2003 20:33:19 -0000 1.10.2.5
+++ openacs-4/packages/file-storage/www/folder-chunk.adp 6 Mar 2003 16:34:14 -0000 1.10.2.6
@@ -82,6 +82,15 @@
+
+
+
+ Download an archive of the contents of this folder
+
+
+ Note: This may take a while, please be patient.
+
+
Folder @folder_name@ is empty
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.8.2.2 -r1.8.2.3
--- openacs-4/packages/file-storage/www/folder-chunk.tcl 18 Feb 2003 02:14:42 -0000 1.8.2.2
+++ openacs-4/packages/file-storage/www/folder-chunk.tcl 6 Mar 2003 16:34:14 -0000 1.8.2.3
@@ -8,6 +8,7 @@
} -properties {
folder_name:onevalue
contents:multirow
+ content_size_total:onevalue
}
if {![exists_and_not_null folder_id]} {
@@ -27,8 +28,11 @@
set folder_name [fs::get_object_name -object_id $folder_id]
+set content_size_total 0
+
db_multirow contents select_folder_contents {} {
set file_upload_name [fs::remove_special_file_system_characters -string $file_upload_name]
+ incr content_size_total $content_size
}
ad_return_template
Index: openacs-4/packages/file-storage/www/index.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/index.adp,v
diff -u -r1.17 -r1.17.2.1
--- openacs-4/packages/file-storage/www/index.adp 17 Sep 2002 21:03:27 -0000 1.17
+++ openacs-4/packages/file-storage/www/index.adp 6 Mar 2003 16:34:14 -0000 1.17.2.1
@@ -47,11 +47,5 @@
-
-
- Download an archive of the contents of this folder
-
-
- Note: This may take a while, please be patient.