Index: openacs-4/packages/general-comments/www/file-add-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/file-add-2.tcl,v
diff -u -r1.6.14.1 -r1.6.14.2
--- openacs-4/packages/general-comments/www/file-add-2.tcl	6 Sep 2013 16:01:50 -0000	1.6.14.1
+++ openacs-4/packages/general-comments/www/file-add-2.tcl	6 Sep 2013 17:37:19 -0000	1.6.14.2
@@ -21,14 +21,14 @@
     { return_url {} }
 } -validate {
     allow_file_attachments {
-        set allow_files_p [ad_parameter AllowFileAttachmentsP {general-comments} {t}]
+        set allow_files_p [parameter::get -parameter AllowFileAttachmentsP -default {t}]
         if { $allow_files_p != "t" } {
             ad_complain "[_ general-comments.lt_Attaching_files_to_co]"            
         }
     }
     check_file_size {
         set tmp_size [file size ${upload_file.tmpfile}]
-        set max_file_size [ad_parameter MaxFileSize {general-comments} {0}]
+        set max_file_size [parameter::get -parameter MaxFileSize -default {0}]
         if { $tmp_size > $max_file_size && $max_file_size > 0 } {
             ad_complain "[_ general-comments.lt_Your_file_is_too_larg]  [_ general-comments.The_publisher_of] [ad_system_name] [_ general-comments.lt_has_chosen_to_limit_a] [util_commify_number $max_file_size] [_ general-comments.bytes].\n"
         }