Index: openacs-4/packages/assessment/www/asm-admin/item-add-mc-choices.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/item-add-mc-choices.tcl,v
diff -u -N -r1.15 -r1.15.2.1
--- openacs-4/packages/assessment/www/asm-admin/item-add-mc-choices.tcl	29 Jun 2018 17:27:18 -0000	1.15
+++ openacs-4/packages/assessment/www/asm-admin/item-add-mc-choices.tcl	2 Jul 2019 08:03:42 -0000	1.15.2.1
@@ -53,7 +53,7 @@
 if { $type == 1} {
     set max_file_size 10000000
     # [parameter::get -parameter MaxAttachmentSize]
-    set pretty_max_size [util_commify_number $max_file_size]
+    set pretty_max_size [lc_content_size_pretty -size $max_file_size]
     set folder_id [as::assessment::folder_id -package_id $package_id]
 
     db_transaction {
@@ -127,7 +127,7 @@
 } -edit_data {
     set max_file_size 10000000
     # [parameter::get -parameter MaxAttachmentSize]
-    set pretty_max_size [util_commify_number $max_file_size]
+    set pretty_max_size [lc_content_size_pretty -size $max_file_size]
     set folder_id [as::assessment::folder_id -package_id $package_id]
 
     db_transaction {