Index: openacs-4/packages/file-storage/www/file-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/file-add.tcl,v diff -u -r1.18 -r1.19 --- openacs-4/packages/file-storage/www/file-add.tcl 27 Oct 2014 16:41:32 -0000 1.18 +++ openacs-4/packages/file-storage/www/file-add.tcl 12 Jun 2015 08:45:46 -0000 1.19 @@ -12,7 +12,7 @@ upload_file.tmpfile:tmpfile,optional content_body:optional {title ""} - {lock_title_p 0} + {lock_title_p:boolean 0} {name ""} } -properties { Index: openacs-4/packages/file-storage/www/file.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/file.tcl,v diff -u -r1.33 -r1.34 --- openacs-4/packages/file-storage/www/file.tcl 27 Oct 2014 16:41:32 -0000 1.33 +++ openacs-4/packages/file-storage/www/file.tcl 12 Jun 2015 08:45:46 -0000 1.34 @@ -6,7 +6,7 @@ @cvs-id $Id$ } { file_id:naturalnum,notnull - {show_all_versions_p "f"} + {show_all_versions_p:boolean "f"} } -validate { valid_file -requires {file_id} { if {![fs_file_p $file_id]} { Index: openacs-4/packages/file-storage/www/folder-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-add.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/file-storage/www/folder-add.tcl 27 Oct 2014 16:41:33 -0000 1.3 +++ openacs-4/packages/file-storage/www/folder-add.tcl 12 Jun 2015 08:45:46 -0000 1.4 @@ -8,7 +8,7 @@ folder_id:naturalnum,optional,notnull upload_folder:trim,optional return_url:optional - {lock_title_p 0} + {lock_title_p:boolean 0} } -properties { folder_id:onevalue Index: openacs-4/packages/file-storage/www/folder-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-delete.tcl,v diff -u -r1.11 -r1.12 --- openacs-4/packages/file-storage/www/folder-delete.tcl 27 Oct 2014 16:41:33 -0000 1.11 +++ openacs-4/packages/file-storage/www/folder-delete.tcl 12 Jun 2015 08:45:46 -0000 1.12 @@ -7,7 +7,7 @@ @cvs-id $Id$ } { folder_id:naturalnum,notnull - {confirmed_p "f"} + {confirmed_p:boolean "f"} } -validate { valid_folder -requires {folder_id:integer} { if {![fs_folder_p $folder_id]} { Index: openacs-4/packages/file-storage/www/folder-zip-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/folder-zip-add.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/file-storage/www/folder-zip-add.tcl 27 Oct 2014 16:41:33 -0000 1.5 +++ openacs-4/packages/file-storage/www/folder-zip-add.tcl 12 Jun 2015 08:45:46 -0000 1.6 @@ -11,7 +11,7 @@ return_url:optional upload_file.tmpfile:tmpfile,optional {title ""} - {lock_title_p 0} + {lock_title_p:boolean 0} } -properties { folder_id:onevalue Index: openacs-4/packages/file-storage/www/simple-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/simple-add.tcl,v diff -u -r1.14 -r1.15 --- openacs-4/packages/file-storage/www/simple-add.tcl 27 Oct 2014 16:41:34 -0000 1.14 +++ openacs-4/packages/file-storage/www/simple-add.tcl 12 Jun 2015 08:45:46 -0000 1.15 @@ -9,7 +9,7 @@ folder_id:naturalnum,notnull {type "fs_url"} {title ""} - {lock_title_p 0} + {lock_title_p:boolean 0} } -validate { valid_folder -requires {folder_id:integer} { if {![fs_folder_p $folder_id]} { Index: openacs-4/packages/file-storage/www/version-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/file-storage/www/version-delete.tcl,v diff -u -r1.13 -r1.14 --- openacs-4/packages/file-storage/www/version-delete.tcl 27 Oct 2014 16:41:34 -0000 1.13 +++ openacs-4/packages/file-storage/www/version-delete.tcl 12 Jun 2015 08:45:46 -0000 1.14 @@ -6,7 +6,7 @@ @cvs-id $Id$ } { version_id:naturalnum,notnull - {confirmed_p "f"} + {confirmed_p:boolean "f"} } -validate { valid_version -requires {version_id} { if {![fs_version_p $version_id]} { Index: openacs-4/packages/forums/www/admin/subscribe-others-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/admin/subscribe-others-2.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/forums/www/admin/subscribe-others-2.tcl 27 Oct 2014 16:41:39 -0000 1.6 +++ openacs-4/packages/forums/www/admin/subscribe-others-2.tcl 12 Jun 2015 08:47:28 -0000 1.7 @@ -15,7 +15,7 @@ delivery_method:notnull {emails ""} {subscriber_ids:integer,multiple} - {create_new_users_p "f"} + {create_new_users_p:boolean "f"} } # Select the info Index: openacs-4/packages/forums/www/moderate/message-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/message-delete.tcl,v diff -u -r1.15 -r1.16 --- openacs-4/packages/forums/www/moderate/message-delete.tcl 27 Oct 2014 16:41:40 -0000 1.15 +++ openacs-4/packages/forums/www/moderate/message-delete.tcl 12 Jun 2015 08:47:28 -0000 1.16 @@ -9,7 +9,7 @@ } { message_id:naturalnum,notnull {return_url "../message-view"} - {confirm_p 0} + {confirm_p:boolean 0} } # Check that the user can moderate the forum Index: openacs-4/packages/forums/www/moderate/message-move.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/message-move.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/forums/www/moderate/message-move.tcl 27 Oct 2014 16:41:40 -0000 1.2 +++ openacs-4/packages/forums/www/moderate/message-move.tcl 12 Jun 2015 08:47:28 -0000 1.3 @@ -8,7 +8,7 @@ } { message_id:naturalnum,notnull {return_url "../message-view"} - {confirm_p 0} + {confirm_p:boolean 0} } # Check that the user can moderate the forum Index: openacs-4/packages/forums/www/moderate/move-thread-thread.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/move-thread-thread.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/forums/www/moderate/move-thread-thread.tcl 27 Oct 2014 16:41:40 -0000 1.4 +++ openacs-4/packages/forums/www/moderate/move-thread-thread.tcl 12 Jun 2015 08:47:28 -0000 1.5 @@ -8,7 +8,7 @@ } { msg_id:naturalnum,notnull selected_message:integer,notnull - {confirm_p 0} + {confirm_p:boolean 0} } set table_border_color [parameter::get -parameter table_border_color] Index: openacs-4/packages/forums/www/moderate/move-thread.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/move-thread.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/forums/www/moderate/move-thread.tcl 27 Oct 2014 16:41:40 -0000 1.5 +++ openacs-4/packages/forums/www/moderate/move-thread.tcl 12 Jun 2015 08:47:28 -0000 1.6 @@ -8,7 +8,7 @@ } { msg_id:naturalnum,notnull selected_message:integer,notnull - {confirm_p 0} + {confirm_p:boolean 0} } set table_border_color [parameter::get -parameter table_border_color] Index: openacs-4/packages/forums/www/moderate/move.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/move.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/forums/www/moderate/move.tcl 27 Oct 2014 16:41:40 -0000 1.4 +++ openacs-4/packages/forums/www/moderate/move.tcl 12 Jun 2015 08:47:28 -0000 1.5 @@ -8,7 +8,7 @@ } { message_id:naturalnum,notnull selected_forum:integer,notnull - {confirm_p 0} + {confirm_p:boolean 0} } set table_border_color [parameter::get -parameter table_border_color] Index: openacs-4/packages/forums/www/moderate/thread-move-thread.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/thread-move-thread.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/forums/www/moderate/thread-move-thread.tcl 27 Oct 2014 16:41:41 -0000 1.2 +++ openacs-4/packages/forums/www/moderate/thread-move-thread.tcl 12 Jun 2015 08:47:28 -0000 1.3 @@ -8,7 +8,7 @@ } { message_id:naturalnum,notnull {return_url "../message-view"} - {confirm_p 0} + {confirm_p:boolean 0} } # Check that the user can moderate the forum Index: openacs-4/packages/forums/www/moderate/thread-move.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/forums/www/moderate/thread-move.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/forums/www/moderate/thread-move.tcl 27 Oct 2014 16:41:41 -0000 1.3 +++ openacs-4/packages/forums/www/moderate/thread-move.tcl 12 Jun 2015 08:47:28 -0000 1.4 @@ -8,7 +8,7 @@ } { message_id:naturalnum,notnull {return_url "../message-view"} - {confirm_p 0} + {confirm_p:boolean 0} } # Check that the user can moderate the forum