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}
}