Index: openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl,v diff -u -r1.43 -r1.44 --- openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl 26 Jul 2014 12:05:12 -0000 1.43 +++ openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl 6 Aug 2014 16:25:19 -0000 1.44 @@ -120,18 +120,18 @@ ad_page_contract { doc } [bug_tracker::get_page_variables { foo:integer { bar "" } }] } { set filter_vars { - page:integer,optional + page:naturalnum,optional f_state:integer,optional f_fix_for_version:integer,optional f_component:integer,optional orderby:optional {format "table"} } foreach { parent_id parent_heading } [bug_tracker::category_types] { - lappend filter_vars "f_category_$parent_id:integer,optional" + lappend filter_vars "f_category_$parent_id:naturalnum,optional" } foreach action_id [workflow::get_actions -workflow_id [bug_tracker::bug::get_instance_workflow_id]] { - lappend filter_vars "f_action_$action_id:integer,optional" + lappend filter_vars "f_action_$action_id:naturalnum,optional" } return [concat $filter_vars $extra_spec] Index: openacs-4/packages/bug-tracker/www/bulk-update-op.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/bulk-update-op.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/bug-tracker/www/bulk-update-op.tcl 14 Oct 2013 18:14:22 -0000 1.2 +++ openacs-4/packages/bug-tracker/www/bulk-update-op.tcl 6 Aug 2014 16:25:20 -0000 1.3 @@ -8,9 +8,9 @@ @creation-date 2007-01-16 @cvs-id $Id$ } { - workflow_id:notnull + workflow_id:naturalnum,notnull op:notnull - bug_id:notnull,multiple + bug_id:naturalnum,notnull,multiple return_url:optional } -properties { } -validate { Index: openacs-4/packages/bug-tracker/www/map-patch-to-bugs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/map-patch-to-bugs.tcl,v diff -u -r1.9 -r1.10 --- openacs-4/packages/bug-tracker/www/map-patch-to-bugs.tcl 14 Oct 2013 18:14:22 -0000 1.9 +++ openacs-4/packages/bug-tracker/www/map-patch-to-bugs.tcl 6 Aug 2014 16:25:20 -0000 1.10 @@ -7,7 +7,7 @@ } { patch_number:integer,notnull bug_number:integer,optional,multiple - component_id:integer,optional + component_id:naturalnum,optional {show_all_components_p "0"} {show_only_open_p "1"} {offset:integer "0"} Index: openacs-4/packages/bug-tracker/www/patch-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/patch-add.tcl,v diff -u -r1.16 -r1.17 --- openacs-4/packages/bug-tracker/www/patch-add.tcl 28 Apr 2014 07:30:40 -0000 1.16 +++ openacs-4/packages/bug-tracker/www/patch-add.tcl 6 Aug 2014 16:25:20 -0000 1.17 @@ -9,7 +9,7 @@ @cvs-id $Id$ } { bug_number:integer,optional - component_id:optional + component_id:naturalnum,optional {return_url ""} } Index: openacs-4/packages/bug-tracker/www/patch-list.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/patch-list.tcl,v diff -u -r1.8 -r1.9 --- openacs-4/packages/bug-tracker/www/patch-list.tcl 29 Mar 2004 15:07:34 -0000 1.8 +++ openacs-4/packages/bug-tracker/www/patch-list.tcl 6 Aug 2014 16:25:20 -0000 1.9 @@ -6,7 +6,7 @@ @date 2002-09-10 @cvs-id $Id$ } { - {component_id:integer,optional} + {component_id:naturalnum,optional} {apply_to_version:integer,optional} {status:trim,optional} } Index: openacs-4/packages/bug-tracker/www/related-file-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/related-file-delete.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/bug-tracker/www/related-file-delete.tcl 14 Oct 2013 18:14:22 -0000 1.3 +++ openacs-4/packages/bug-tracker/www/related-file-delete.tcl 6 Aug 2014 16:25:20 -0000 1.4 @@ -8,8 +8,8 @@ @creation-date 2007-01-16 @cvs-id $Id$ } { - bug_id:notnull - related_object_id:notnull + bug_id:naturalnum,notnull + related_object_id:naturalnum,notnull return_url:optional } -properties { } -validate { Index: openacs-4/packages/bug-tracker/www/related-file-download.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/related-file-download.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/bug-tracker/www/related-file-download.tcl 14 Oct 2013 18:14:22 -0000 1.2 +++ openacs-4/packages/bug-tracker/www/related-file-download.tcl 6 Aug 2014 16:25:20 -0000 1.3 @@ -8,8 +8,8 @@ @creation-date 2007-01-16 @cvs-id $Id$ } { - bug_id:notnull - related_object_id:notnull + bug_id:naturalnum,notnull + related_object_id:naturalnum,notnull revision_id:optional,naturalnum } -properties { } -validate { Index: openacs-4/packages/bug-tracker/www/related-file-properties.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/related-file-properties.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/bug-tracker/www/related-file-properties.tcl 14 Oct 2013 18:14:22 -0000 1.2 +++ openacs-4/packages/bug-tracker/www/related-file-properties.tcl 6 Aug 2014 16:25:20 -0000 1.3 @@ -8,8 +8,8 @@ @creation-date 2007-01-22 @cvs-id $Id$ } { - bug_id:notnull - related_object_id:notnull + bug_id:naturalnum,notnull + related_object_id:naturalnum,notnull } -properties { } -validate { } -errors { Index: openacs-4/packages/bug-tracker/www/related-file-update.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/related-file-update.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/bug-tracker/www/related-file-update.tcl 14 Oct 2013 18:14:22 -0000 1.2 +++ openacs-4/packages/bug-tracker/www/related-file-update.tcl 6 Aug 2014 16:25:20 -0000 1.3 @@ -8,8 +8,8 @@ @creation-date 2007-01-16 @cvs-id $Id$ } { - bug_id:notnull - related_object_id:notnull + bug_id:naturalnum,notnull + related_object_id:naturalnum,notnull return_url:optional } -properties { } -validate { Index: openacs-4/packages/bug-tracker/www/send-summary-email.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/send-summary-email.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/bug-tracker/www/send-summary-email.tcl 14 Oct 2013 18:14:22 -0000 1.2 +++ openacs-4/packages/bug-tracker/www/send-summary-email.tcl 6 Aug 2014 16:25:20 -0000 1.3 @@ -8,8 +8,8 @@ @creation-date 2007-11-14 @cvs-id $Id$ } { - workflow_id:notnull - {bug_id:optional,multiple ""} + workflow_id:naturalnum,notnull + {bug_id:naturalnum,optional,multiple ""} return_url:optional } Index: openacs-4/packages/bug-tracker/www/admin/category-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/category-delete.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/bug-tracker/www/admin/category-delete.tcl 1 Mar 2005 00:01:26 -0000 1.3 +++ openacs-4/packages/bug-tracker/www/admin/category-delete.tcl 6 Aug 2014 16:25:20 -0000 1.4 @@ -1,7 +1,7 @@ ad_page_contract { Delete category } { - keyword_id:integer + keyword_id:naturalnum,notnull } content::keyword::delete \ Index: openacs-4/packages/bug-tracker/www/admin/category-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/category-edit.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/bug-tracker/www/admin/category-edit.tcl 14 Oct 2013 18:14:22 -0000 1.5 +++ openacs-4/packages/bug-tracker/www/admin/category-edit.tcl 6 Aug 2014 16:25:20 -0000 1.6 @@ -1,8 +1,8 @@ ad_page_contract { Add or edit a category. } { - keyword_id:integer,optional - parent_id:integer,optional + keyword_id:naturalnum,optional + parent_id:naturalnum,optional {type_p "f"} } Index: openacs-4/packages/bug-tracker/www/admin/category-set-default.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/category-set-default.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/bug-tracker/www/admin/category-set-default.tcl 5 Mar 2003 17:41:17 -0000 1.1 +++ openacs-4/packages/bug-tracker/www/admin/category-set-default.tcl 6 Aug 2014 16:25:20 -0000 1.2 @@ -1,8 +1,8 @@ ad_page_contract { Set default category } { - parent_id:integer - keyword_id:integer + parent_id:naturalnum,notnull + keyword_id:naturalnum,notnull } bug_tracker::set_default_keyword \ Index: openacs-4/packages/bug-tracker/www/admin/component-ae.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/component-ae.tcl,v diff -u -r1.10 -r1.11 --- openacs-4/packages/bug-tracker/www/admin/component-ae.tcl 29 Mar 2004 15:07:35 -0000 1.10 +++ openacs-4/packages/bug-tracker/www/admin/component-ae.tcl 6 Aug 2014 16:25:20 -0000 1.11 @@ -3,7 +3,7 @@ @creation-date 2002-03-26 @cvs-id $Id$ } { - component_id:integer,optional + component_id:naturalnum,optional {return_url "."} } Index: openacs-4/packages/bug-tracker/www/admin/component-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/component-delete.tcl,v diff -u -r1.2 -r1.3 --- openacs-4/packages/bug-tracker/www/admin/component-delete.tcl 5 Mar 2003 17:41:17 -0000 1.2 +++ openacs-4/packages/bug-tracker/www/admin/component-delete.tcl 6 Aug 2014 16:25:20 -0000 1.3 @@ -1,7 +1,7 @@ ad_page_contract { Delete component } { - component_id:integer + component_id:naturalnum,notnull } db_dml delete_component {} Index: openacs-4/packages/bug-tracker/www/admin/version-ae.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/version-ae.tcl,v diff -u -r1.8 -r1.9 --- openacs-4/packages/bug-tracker/www/admin/version-ae.tcl 29 Mar 2004 15:07:35 -0000 1.8 +++ openacs-4/packages/bug-tracker/www/admin/version-ae.tcl 6 Aug 2014 16:25:20 -0000 1.9 @@ -4,7 +4,7 @@ @creation-date March 26, 2002 @cvs-id $Id$ } { - version_id:integer,optional + version_id:naturalnum,optional {return_url "."} } Index: openacs-4/packages/bug-tracker/www/admin/version-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/version-delete.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/bug-tracker/www/admin/version-delete.tcl 5 Mar 2003 17:41:17 -0000 1.1 +++ openacs-4/packages/bug-tracker/www/admin/version-delete.tcl 6 Aug 2014 16:25:20 -0000 1.2 @@ -1,7 +1,7 @@ ad_page_contract { Delete version } { - version_id:integer + version_id:naturalnum,notnull } db_dml delete_version {} Index: openacs-4/packages/bug-tracker/www/admin/version-release.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/version-release.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/bug-tracker/www/admin/version-release.tcl 29 Mar 2004 15:07:35 -0000 1.3 +++ openacs-4/packages/bug-tracker/www/admin/version-release.tcl 6 Aug 2014 16:25:20 -0000 1.4 @@ -1,7 +1,7 @@ ad_page_contract { Release version } { - version_id:integer + version_id:naturalnum,notnull } set page_title [_ bug-tracker.Release_1] Index: openacs-4/packages/bug-tracker/www/admin/version-set-active.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/admin/version-set-active.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/bug-tracker/www/admin/version-set-active.tcl 26 Sep 2003 07:30:20 -0000 1.4 +++ openacs-4/packages/bug-tracker/www/admin/version-set-active.tcl 6 Aug 2014 16:25:21 -0000 1.5 @@ -5,7 +5,7 @@ @creation-date 2002-03-28 } { - { version_id "" } + { version_id:naturalnum "" } { return_url "" } } Index: openacs-4/packages/download/tcl/download-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/tcl/download-procs.tcl,v diff -u -r1.16 -r1.17 --- openacs-4/packages/download/tcl/download-procs.tcl 11 Oct 2013 10:29:31 -0000 1.16 +++ openacs-4/packages/download/tcl/download-procs.tcl 6 Aug 2014 16:24:41 -0000 1.17 @@ -116,8 +116,8 @@ } { ad_page_contract { } { - { revision_id:naturalnum,notnull "" } - { download_id:naturalnum,notnull "" } + { revision_id:naturalnum "" } + { download_id:naturalnum "" } { reason_id "" } { reason_other ""} } Index: openacs-4/packages/download/www/archive-add-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-add-2.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/download/www/archive-add-2.tcl 11 Oct 2013 10:29:31 -0000 1.6 +++ openacs-4/packages/download/www/archive-add-2.tcl 6 Aug 2014 16:24:41 -0000 1.7 @@ -8,7 +8,7 @@ upload_file:notnull,trim upload_file.tmpfile:tmpfile {return_url "[ad_conn package_url]"} - archive_type_id:integer,notnull + archive_type_id:naturalnum,notnull archive_name:notnull {version_name ""} summary:notnull Index: openacs-4/packages/download/www/archive-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-add.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/download/www/archive-add.tcl 12 Sep 2013 10:26:11 -0000 1.5 +++ openacs-4/packages/download/www/archive-add.tcl 6 Aug 2014 16:24:41 -0000 1.6 @@ -5,7 +5,7 @@ @creation-date Tue Dec 12 22:38:49 2000 @cvs-id $Id$ } { - archive_type_id:integer,notnull + archive_type_id:naturalnum,notnull {return_url "[ad_conn package_url]"} } Index: openacs-4/packages/download/www/archive-version-add-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/archive-version-add-2.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/download/www/archive-version-add-2.tcl 12 Sep 2013 10:26:11 -0000 1.3 +++ openacs-4/packages/download/www/archive-version-add-2.tcl 6 Aug 2014 16:24:41 -0000 1.4 @@ -9,7 +9,7 @@ upload_file.tmpfile:tmpfile {return_url "[ad_conn package_url]"} version_name:notnull - archive_id:integer,notnull + archive_id:naturalnum,notnull metadata:array,optional,multiple,html } -validate { check_metadata -requires { } { Index: openacs-4/packages/download/www/download-verify.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/download-verify.tcl,v diff -u -r1.10 -r1.11 --- openacs-4/packages/download/www/download-verify.tcl 30 Sep 2013 11:05:49 -0000 1.10 +++ openacs-4/packages/download/www/download-verify.tcl 6 Aug 2014 16:24:41 -0000 1.11 @@ -5,7 +5,7 @@ @creation-date Wed Dec 13 00:23:21 2000 @cvs-id $Id$ } { - revision_id:integer,notnull + revision_id:naturalnum,notnull } set user_id [ad_conn user_id] Index: openacs-4/packages/download/www/one-archive.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/one-archive.tcl,v diff -u -r1.10 -r1.11 --- openacs-4/packages/download/www/one-archive.tcl 30 Sep 2013 11:05:49 -0000 1.10 +++ openacs-4/packages/download/www/one-archive.tcl 6 Aug 2014 16:24:41 -0000 1.11 @@ -6,7 +6,7 @@ @creation-date Wed Dec 13 14:38:45 2000 @cvs-id $Id$ } { - archive_id:integer,notnull + archive_id:naturalnum,notnull } permission::require_permission -object_id $archive_id -privilege read Index: openacs-4/packages/download/www/admin/approve-or-reject-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/approve-or-reject-2.tcl,v diff -u -r1.8 -r1.9 --- openacs-4/packages/download/www/admin/approve-or-reject-2.tcl 30 Sep 2013 11:05:49 -0000 1.8 +++ openacs-4/packages/download/www/admin/approve-or-reject-2.tcl 6 Aug 2014 16:24:41 -0000 1.9 @@ -6,7 +6,7 @@ @cvs-id $Id$ } { action:notnull - revision_id:integer,notnull + revision_id:naturalnum,notnull { approved_comment [db_null] } {return_url "[ad_conn package_url]"} } -validate { Index: openacs-4/packages/download/www/admin/approve-or-reject.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/approve-or-reject.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/download/www/admin/approve-or-reject.tcl 30 Sep 2013 11:05:50 -0000 1.6 +++ openacs-4/packages/download/www/admin/approve-or-reject.tcl 6 Aug 2014 16:24:41 -0000 1.7 @@ -6,7 +6,7 @@ @cvs-id $Id$ } { action:notnull - revision_id:integer,notnull + revision_id:naturalnum,notnull {return_url "[ad_conn package_url]"} } -validate { valid_action_value { Index: openacs-4/packages/download/www/admin/report-one-user.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/report-one-user.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/download/www/admin/report-one-user.tcl 12 Sep 2013 10:26:12 -0000 1.7 +++ openacs-4/packages/download/www/admin/report-one-user.tcl 6 Aug 2014 16:24:41 -0000 1.8 @@ -5,7 +5,7 @@ @creation-date Thu Dec 14 16:11:49 2000 @cvs-id $Id$ } { - user_id:integer,notnull + user_id:naturalnum,notnull {orderby "archive_name"} {downloaded "1m"} } -properties { Index: openacs-4/packages/download/www/admin/report-version-downloads.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/report-version-downloads.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/download/www/admin/report-version-downloads.tcl 12 Sep 2013 10:26:12 -0000 1.7 +++ openacs-4/packages/download/www/admin/report-version-downloads.tcl 6 Aug 2014 16:24:41 -0000 1.8 @@ -5,7 +5,7 @@ @creation-date Thu Dec 14 17:37:31 2000 @cvs-id $Id$ } { - {archive_id:integer,notnull} + {archive_id:naturalnum,notnull} {orderby "user_name"} {downloaded 1m} {versions "current"} Index: openacs-4/packages/download/www/admin/repository-ae.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-ae.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/download/www/admin/repository-ae.tcl 12 Sep 2013 10:26:13 -0000 1.6 +++ openacs-4/packages/download/www/admin/repository-ae.tcl 6 Aug 2014 16:24:41 -0000 1.7 @@ -5,7 +5,7 @@ @creation-date Mon Dec 11 18:49:53 2000 @cvs-id $Id$ } { - repository_id:integer,notnull + repository_id:naturalnum,notnull {return_url "[ad_conn package_url]/admin/"} } Index: openacs-4/packages/download/www/admin/repository-metadata-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-metadata-delete.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/download/www/admin/repository-metadata-delete.tcl 12 Sep 2013 10:26:13 -0000 1.3 +++ openacs-4/packages/download/www/admin/repository-metadata-delete.tcl 6 Aug 2014 16:24:41 -0000 1.4 @@ -5,7 +5,7 @@ @creation-date Tue Dec 12 16:46:37 2000 @cvs-id $Id$ } { - metadata_id:integer,notnull + metadata_id:naturalnum,notnull } set repository_id [download_repository_id] Index: openacs-4/packages/download/www/admin/repository-metadata-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-metadata-edit.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/download/www/admin/repository-metadata-edit.tcl 30 Sep 2013 11:05:50 -0000 1.6 +++ openacs-4/packages/download/www/admin/repository-metadata-edit.tcl 6 Aug 2014 16:24:41 -0000 1.7 @@ -5,7 +5,7 @@ @creation-date Fri Dec 15 14:53:56 2000 @cvs-id $Id$ } { - metadata_id:integer,notnull + metadata_id:naturalnum,notnull } set context [list "Metadata edit"] Index: openacs-4/packages/download/www/admin/repository-reasons-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-reasons-delete.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/download/www/admin/repository-reasons-delete.tcl 12 Sep 2013 10:26:13 -0000 1.3 +++ openacs-4/packages/download/www/admin/repository-reasons-delete.tcl 6 Aug 2014 16:24:41 -0000 1.4 @@ -5,7 +5,7 @@ @creation-date Tue Dec 12 16:46:37 2000 @cvs-id $Id$ } { - download_reason_id:integer,notnull + download_reason_id:naturalnum,notnull } set repository_id [download_repository_id] Index: openacs-4/packages/download/www/admin/repository-reasons-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-reasons-edit.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/download/www/admin/repository-reasons-edit.tcl 12 Sep 2013 10:26:13 -0000 1.6 +++ openacs-4/packages/download/www/admin/repository-reasons-edit.tcl 6 Aug 2014 16:24:41 -0000 1.7 @@ -5,7 +5,7 @@ @creation-date Wed Jan 10 18:34:23 2001 @cvs-id $Id$ } { - download_reason_id:integer,notnull + download_reason_id:naturalnum,notnull } set repository_id [download_repository_id] Index: openacs-4/packages/download/www/admin/repository-types-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-types-delete.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/download/www/admin/repository-types-delete.tcl 12 Sep 2013 10:26:13 -0000 1.3 +++ openacs-4/packages/download/www/admin/repository-types-delete.tcl 6 Aug 2014 16:24:41 -0000 1.4 @@ -5,7 +5,7 @@ @creation-date Tue Dec 12 16:46:37 2000 @cvs-id $Id$ } { - archive_type_id:integer,notnull + archive_type_id:naturalnum,notnull } set repository_id [download_repository_id] Index: openacs-4/packages/download/www/admin/repository-types-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/download/www/admin/repository-types-edit.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/download/www/admin/repository-types-edit.tcl 12 Sep 2013 10:26:13 -0000 1.6 +++ openacs-4/packages/download/www/admin/repository-types-edit.tcl 6 Aug 2014 16:24:42 -0000 1.7 @@ -5,7 +5,7 @@ @creation-date Wed Jan 10 18:34:23 2001 @cvs-id $Id$ } { - archive_type_id:integer,notnull + archive_type_id:naturalnum,notnull } set repository_id [download_repository_id] Index: openacs-4/packages/workflow/www/admin/action-ae.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/www/admin/action-ae.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/workflow/www/admin/action-ae.tcl 17 Sep 2013 19:10:35 -0000 1.6 +++ openacs-4/packages/workflow/www/admin/action-ae.tcl 6 Aug 2014 16:34:02 -0000 1.7 @@ -8,8 +8,8 @@ @cvs-id $Id$ } { {return_url [get_referrer]} - {action_id:optional} - {workflow_id:notnull} + {action_id:naturalnum,optional} + {workflow_id:naturalnum,notnull} } Index: openacs-4/packages/workflow/www/admin/role-ae.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/www/admin/role-ae.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/workflow/www/admin/role-ae.tcl 17 Sep 2013 19:10:35 -0000 1.4 +++ openacs-4/packages/workflow/www/admin/role-ae.tcl 6 Aug 2014 16:34:02 -0000 1.5 @@ -8,8 +8,8 @@ @cvs-id $Id$ } { {return_url [get_referrer]} - {role_id:optional} - {workflow_id:notnull} + {role_id:naturalnum,optional} + {workflow_id:naturalnum,notnull} } set title "State Add or Edit" Index: openacs-4/packages/workflow/www/admin/state-ae.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/www/admin/state-ae.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/workflow/www/admin/state-ae.tcl 26 Oct 2011 01:11:55 -0000 1.3 +++ openacs-4/packages/workflow/www/admin/state-ae.tcl 6 Aug 2014 16:34:02 -0000 1.4 @@ -8,8 +8,8 @@ @cvs-id $Id$ } { {return_url [get_referrer]} - {state_id:optional} - {workflow_id:notnull} + {state_id:naturalnum,optional} + {workflow_id:naturalnum,notnull} } set title "State Add or Edit" Index: openacs-4/packages/workflow/www/admin/workflow-ae.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/www/admin/workflow-ae.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/workflow/www/admin/workflow-ae.tcl 17 Sep 2013 19:10:35 -0000 1.4 +++ openacs-4/packages/workflow/www/admin/workflow-ae.tcl 6 Aug 2014 16:34:03 -0000 1.5 @@ -8,7 +8,7 @@ @cvs-id $Id$ } { {return_url [get_referrer]} - {workflow_id:optional} + {workflow_id:naturalnum,optional} } set title "Edit" Index: openacs-4/packages/workflow/www/admin/workflow-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/www/admin/workflow-edit.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/workflow/www/admin/workflow-edit.tcl 17 Sep 2013 16:49:07 -0000 1.3 +++ openacs-4/packages/workflow/www/admin/workflow-edit.tcl 6 Aug 2014 16:34:03 -0000 1.4 @@ -8,7 +8,7 @@ @cvs-id $Id$ } { {return_url [get_referrer]} - {workflow_id:integer,notnull} + {workflow_id:naturalnum,notnull} } set title "Workflow Edit" Index: openacs-4/packages/workflow/www/admin/workflow-graph.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/www/admin/workflow-graph.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/workflow/www/admin/workflow-graph.tcl 26 Oct 2011 01:11:55 -0000 1.3 +++ openacs-4/packages/workflow/www/admin/workflow-graph.tcl 6 Aug 2014 16:34:03 -0000 1.4 @@ -4,7 +4,7 @@ @creation-date 4/5/2005 @cvs-id $Id$ } { - {workflow_id} + {workflow_id:naturalnum,notnull} {states_to_highlight ""} } Index: openacs-4/packages/workflow/www/admin/workflow-meta-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/workflow/www/admin/workflow-meta-edit.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/workflow/www/admin/workflow-meta-edit.tcl 17 Sep 2013 19:10:35 -0000 1.4 +++ openacs-4/packages/workflow/www/admin/workflow-meta-edit.tcl 6 Aug 2014 16:34:03 -0000 1.5 @@ -8,7 +8,7 @@ @cvs-id $Id$ } { {return_url [get_referrer]} - {workflow_id:notnull} + {workflow_id:naturalnum,notnull} }