Index: openacs-4/packages/general-comments/www/comment-add-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/comment-add-2.tcl,v diff -u -N -r1.6.20.3 -r1.6.20.4 --- openacs-4/packages/general-comments/www/comment-add-2.tcl 29 Jul 2014 11:24:07 -0000 1.6.20.3 +++ openacs-4/packages/general-comments/www/comment-add-2.tcl 5 Aug 2014 09:29:51 -0000 1.6.20.4 @@ -13,7 +13,7 @@ title:notnull content:html,notnull comment_mime_type:notnull - { context_id "$object_id" } + { context_id:naturalnum "$object_id" } { category {} } { return_url {} } } -properties { Index: openacs-4/packages/general-comments/www/comment-add-3.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/comment-add-3.tcl,v diff -u -N -r1.9.8.5 -r1.9.8.6 --- openacs-4/packages/general-comments/www/comment-add-3.tcl 29 Jul 2014 11:24:07 -0000 1.9.8.5 +++ openacs-4/packages/general-comments/www/comment-add-3.tcl 5 Aug 2014 09:29:51 -0000 1.9.8.6 @@ -13,7 +13,7 @@ title:notnull content:html,notnull comment_mime_type - { context_id "$object_id" } + { context_id:naturalnum "$object_id" } { category "" } { return_url "" } { attach_p "f" } Index: openacs-4/packages/general-comments/www/comment-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/comment-add.tcl,v diff -u -N -r1.5.20.3 -r1.5.20.4 --- openacs-4/packages/general-comments/www/comment-add.tcl 29 Jul 2014 11:24:07 -0000 1.5.20.3 +++ openacs-4/packages/general-comments/www/comment-add.tcl 5 Aug 2014 09:29:51 -0000 1.5.20.4 @@ -10,7 +10,7 @@ } { object_id:naturalnum,notnull { object_name "[acs_object_name $object_id]" } - { context_id "$object_id" } + { context_id:naturalnum "$object_id" } { category "" } { return_url "" } } -properties { Index: openacs-4/packages/general-comments/www/comment-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/comment-edit.tcl,v diff -u -N -r1.5.20.3 -r1.5.20.4 --- openacs-4/packages/general-comments/www/comment-edit.tcl 29 Jul 2014 11:24:07 -0000 1.5.20.3 +++ openacs-4/packages/general-comments/www/comment-edit.tcl 5 Aug 2014 09:29:51 -0000 1.5.20.4 @@ -11,7 +11,7 @@ @cvs-id $Id$ } { comment_id:naturalnum,notnull - { revision_id {} } + { revision_id:naturalnum {} } { return_url {} } } -properties { page_title:onevalue Index: openacs-4/packages/general-comments/www/file-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/file-add.tcl,v diff -u -N -r1.4.20.2 -r1.4.20.3 --- openacs-4/packages/general-comments/www/file-add.tcl 6 Sep 2013 17:37:19 -0000 1.4.20.2 +++ openacs-4/packages/general-comments/www/file-add.tcl 5 Aug 2014 09:29:52 -0000 1.4.20.3 @@ -10,7 +10,7 @@ @creation-date 2000-10-12 @cvs-id $Id$ } { - parent_id:notnull,integer + parent_id:notnull,naturalnum {return_url {} } } -properties { page_title:onevalue Index: openacs-4/packages/general-comments/www/file-download.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/file-download.tcl,v diff -u -N -r1.3.26.1 -r1.3.26.2 --- openacs-4/packages/general-comments/www/file-download.tcl 6 Sep 2013 16:01:50 -0000 1.3.26.1 +++ openacs-4/packages/general-comments/www/file-download.tcl 5 Aug 2014 09:29:52 -0000 1.3.26.2 @@ -10,7 +10,7 @@ @creation-date 2000-10-12 @cvs-id $Id$ } { - item_id:notnull + item_id:naturalnum,notnull } # check for permissions Index: openacs-4/packages/general-comments/www/url-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/url-add.tcl,v diff -u -N -r1.4.20.2 -r1.4.20.3 --- openacs-4/packages/general-comments/www/url-add.tcl 6 Sep 2013 17:37:19 -0000 1.4.20.2 +++ openacs-4/packages/general-comments/www/url-add.tcl 5 Aug 2014 09:29:52 -0000 1.4.20.3 @@ -10,7 +10,7 @@ @creation-date 2000-10-12 @cvs-id $Id$ } { - parent_id:notnull,integer + parent_id:notnull,naturalnum { return_url {} } } -properties { page_title:onevalue Index: openacs-4/packages/general-comments/www/view-comment.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/view-comment.tcl,v diff -u -N -r1.9.2.4 -r1.9.2.5 --- openacs-4/packages/general-comments/www/view-comment.tcl 3 Oct 2013 08:41:29 -0000 1.9.2.4 +++ openacs-4/packages/general-comments/www/view-comment.tcl 5 Aug 2014 09:29:52 -0000 1.9.2.5 @@ -8,8 +8,8 @@ @creation-date 2000-10-12 @cvs-id $Id$ } { - comment_id:notnull - { revision_id {} } + comment_id:naturalnum,notnull + { revision_id:naturalnum,optional {} } { object_name {} } { return_url {} } } -properties { Index: openacs-4/packages/general-comments/www/view-image.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/view-image.tcl,v diff -u -N -r1.4.20.1 -r1.4.20.2 --- openacs-4/packages/general-comments/www/view-image.tcl 6 Sep 2013 16:01:50 -0000 1.4.20.1 +++ openacs-4/packages/general-comments/www/view-image.tcl 5 Aug 2014 09:29:52 -0000 1.4.20.2 @@ -8,7 +8,7 @@ @creation-date 2000-10-12 @cvs-id $Id$ } { - image_id:notnull + image_id:naturalnum,notnull { return_url {} } } -properties { page_title:onevalue Index: openacs-4/packages/general-comments/www/admin/toggle-approval.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/admin/toggle-approval.tcl,v diff -u -N -r1.2.26.2 -r1.2.26.3 --- openacs-4/packages/general-comments/www/admin/toggle-approval.tcl 29 Jul 2014 11:24:09 -0000 1.2.26.2 +++ openacs-4/packages/general-comments/www/admin/toggle-approval.tcl 5 Aug 2014 09:29:52 -0000 1.2.26.3 @@ -11,7 +11,7 @@ @cvs-id $Id$ } { comment_id:naturalnum,notnull - {revision_id {}} + {revision_id:naturalnum {}} {return_url {}} }