Index: openacs-4/packages/dotlrn/lib/member-email-confirm.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/lib/member-email-confirm.tcl,v diff -u -r1.5 -r1.5.2.1 --- openacs-4/packages/dotlrn/lib/member-email-confirm.tcl 1 Nov 2013 21:08:28 -0000 1.5 +++ openacs-4/packages/dotlrn/lib/member-email-confirm.tcl 18 Aug 2014 19:22:01 -0000 1.5.2.1 @@ -2,7 +2,7 @@ Ask admin to confirm email and if so let the admin edit the email before sending } { - user_id + user_id:naturalnum,notnull {type "on join"} {return_url ""} } Index: openacs-4/packages/dotlrn/www/community-member.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/community-member.tcl,v diff -u -r1.19 -r1.19.4.1 --- openacs-4/packages/dotlrn/www/community-member.tcl 3 Apr 2009 12:13:49 -0000 1.19 +++ openacs-4/packages/dotlrn/www/community-member.tcl 18 Aug 2014 19:22:02 -0000 1.19.4.1 @@ -21,8 +21,8 @@ @creation-date 2002-01-22 @version $Id$ } { - user_id:integer,notnull - {community_id ""} + user_id:naturalnum,notnull + {community_id:naturalnum ""} {return_url ""} } -properties { portal_id:onevalue Index: openacs-4/packages/dotlrn/www/deregister-confirm.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/deregister-confirm.tcl,v diff -u -r1.5 -r1.5.2.1 --- openacs-4/packages/dotlrn/www/deregister-confirm.tcl 1 Nov 2013 21:08:31 -0000 1.5 +++ openacs-4/packages/dotlrn/www/deregister-confirm.tcl 18 Aug 2014 19:22:02 -0000 1.5.2.1 @@ -21,7 +21,7 @@ @creation-date 2002-29-08 @version $Id$ } -query { - {user_id:integer,multiple,notnull} + {user_id:naturalnum,multiple,notnull} {community_id ""} {referer ""} } Index: openacs-4/packages/dotlrn/www/element-rename.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/element-rename.tcl,v diff -u -r1.3 -r1.3.2.1 --- openacs-4/packages/dotlrn/www/element-rename.tcl 1 Nov 2013 21:08:31 -0000 1.3 +++ openacs-4/packages/dotlrn/www/element-rename.tcl 18 Aug 2014 19:22:02 -0000 1.3.2.1 @@ -6,7 +6,7 @@ @author Rodrigo Proenca (roop@terra.com.br) } { - element_id:notnull,integer + element_id:notnull,naturalnum pretty_name:optional,trim,html } Index: openacs-4/packages/dotlrn/www/member-confirm.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/member-confirm.tcl,v diff -u -r1.3 -r1.3.2.1 --- openacs-4/packages/dotlrn/www/member-confirm.tcl 1 Nov 2013 21:08:32 -0000 1.3 +++ openacs-4/packages/dotlrn/www/member-confirm.tcl 18 Aug 2014 19:22:02 -0000 1.3.2.1 @@ -5,7 +5,7 @@ @creation-date August 8,2005 } { - {user_id:optional} + {user_id:naturalnum,optional} {reset:optional} {reltype:optional} {referer "./"} Index: openacs-4/packages/dotlrn/www/one-community-portal-configure-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/one-community-portal-configure-2.tcl,v diff -u -r1.11 -r1.11.8.1 --- openacs-4/packages/dotlrn/www/one-community-portal-configure-2.tcl 8 Aug 2006 21:26:24 -0000 1.11 +++ openacs-4/packages/dotlrn/www/one-community-portal-configure-2.tcl 18 Aug 2014 19:22:02 -0000 1.11.8.1 @@ -20,7 +20,7 @@ @author Arjun Sanyal (arjun@openforce.net) @version $Id$ } { - portal_id:integer + portal_id:naturalnum,notnull return_url {anchor {}} } Index: openacs-4/packages/dotlrn/www/subscribe-members.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/subscribe-members.tcl,v diff -u -r1.4 -r1.4.2.1 --- openacs-4/packages/dotlrn/www/subscribe-members.tcl 1 Nov 2013 21:08:32 -0000 1.4 +++ openacs-4/packages/dotlrn/www/subscribe-members.tcl 18 Aug 2014 19:22:02 -0000 1.4.2.1 @@ -19,8 +19,8 @@ @author Don Baccus (dhogaza@pacifier.com) @cvs_id $Id$ } { - forum_id:integer,notnull - community_id:integer,notnull + forum_id:naturalnum,notnull + community_id:naturalnum,notnull return_url:notnull } Index: openacs-4/packages/dotlrn/www/unsubscribe-members.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/unsubscribe-members.tcl,v diff -u -r1.3 -r1.3.8.1 --- openacs-4/packages/dotlrn/www/unsubscribe-members.tcl 8 Aug 2006 21:26:24 -0000 1.3 +++ openacs-4/packages/dotlrn/www/unsubscribe-members.tcl 18 Aug 2014 19:22:02 -0000 1.3.8.1 @@ -19,8 +19,8 @@ @author Don Baccus (dhogaza@pacifier.com) @cvs_id $Id$ } { - forum_id:integer,notnull - community_id:integer,notnull + forum_id:naturalnum,notnull + community_id:naturalnum,notnull return_url:notnull } Index: openacs-4/packages/dotlrn/www/admin/add-edit-site-template.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/add-edit-site-template.tcl,v diff -u -r1.2 -r1.2.8.1 --- openacs-4/packages/dotlrn/www/admin/add-edit-site-template.tcl 8 Aug 2006 21:26:28 -0000 1.2 +++ openacs-4/packages/dotlrn/www/admin/add-edit-site-template.tcl 18 Aug 2014 19:22:02 -0000 1.2.8.1 @@ -9,7 +9,7 @@ @arch-tag: 9619249e-d7fb-4292-8af1-98b92ee33bba @cvs-id $Id$ } { - site_template_id:optional + site_template_id:naturalnum,optional referer:notnull {pretty_name ""} {site_master ""} Index: openacs-4/packages/dotlrn/www/admin/add-instructor-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/add-instructor-2.tcl,v diff -u -r1.10 -r1.10.8.1 --- openacs-4/packages/dotlrn/www/admin/add-instructor-2.tcl 8 Aug 2006 21:26:28 -0000 1.10 +++ openacs-4/packages/dotlrn/www/admin/add-instructor-2.tcl 18 Aug 2014 19:22:02 -0000 1.10.8.1 @@ -21,7 +21,7 @@ @creation-date Jan 10, 2002 @version $Id$ } -query { - community_id:integer,notnull + community_id:naturalnum,notnull {search_text ""} {referer ""} } -properties { Index: openacs-4/packages/dotlrn/www/admin/add-instructor-3.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/add-instructor-3.tcl,v diff -u -r1.14 -r1.14.8.1 --- openacs-4/packages/dotlrn/www/admin/add-instructor-3.tcl 21 Dec 2006 15:57:53 -0000 1.14 +++ openacs-4/packages/dotlrn/www/admin/add-instructor-3.tcl 18 Aug 2014 19:22:02 -0000 1.14.8.1 @@ -21,8 +21,8 @@ @creation-date Jan 10, 2002 @version $Id$ } -query { - user_id:integer,notnull - community_id:integer,notnull + user_id:naturalnum,notnull + community_id:naturalnum,notnull {referer ""} } Index: openacs-4/packages/dotlrn/www/admin/add-instructor.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/add-instructor.tcl,v diff -u -r1.10 -r1.10.8.1 --- openacs-4/packages/dotlrn/www/admin/add-instructor.tcl 8 Aug 2006 21:26:28 -0000 1.10 +++ openacs-4/packages/dotlrn/www/admin/add-instructor.tcl 18 Aug 2014 19:22:02 -0000 1.10.8.1 @@ -21,7 +21,7 @@ @creation-date Jan 10, 2002 @version $Id$ } -query { - community_id:integer,notnull + community_id:naturalnum,notnull {referer "./"} } Index: openacs-4/packages/dotlrn/www/admin/become.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/become.tcl,v diff -u -r1.2 -r1.2.12.1 --- openacs-4/packages/dotlrn/www/admin/become.tcl 13 Jan 2005 13:57:21 -0000 1.2 +++ openacs-4/packages/dotlrn/www/admin/become.tcl 18 Aug 2014 19:22:03 -0000 1.2.12.1 @@ -5,5 +5,5 @@ @creation-date 27 Jan 2000 } { - user_id + user_id:naturalnum,notnull } Index: openacs-4/packages/dotlrn/www/admin/clubs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/clubs.tcl,v diff -u -r1.18 -r1.18.4.1 --- openacs-4/packages/dotlrn/www/admin/clubs.tcl 17 Aug 2008 01:01:11 -0000 1.18 +++ openacs-4/packages/dotlrn/www/admin/clubs.tcl 18 Aug 2014 19:22:03 -0000 1.18.4.1 @@ -24,7 +24,7 @@ @version $Id$ } -query { {orderby "pretty_name,asc"} - page:optional + page:naturalnum,optional } -properties { title:onevalue context_bar:onevalue Index: openacs-4/packages/dotlrn/www/admin/departments.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/departments.tcl,v diff -u -r1.12 -r1.12.2.1 --- openacs-4/packages/dotlrn/www/admin/departments.tcl 1 Nov 2013 21:08:33 -0000 1.12 +++ openacs-4/packages/dotlrn/www/admin/departments.tcl 18 Aug 2014 19:22:03 -0000 1.12.2.1 @@ -23,7 +23,7 @@ } -query { {keyword ""} {orderby "department_name,asc"} - page:optional + page:naturalnum,optional } -properties { title:onevalue context_bar:onevalue Index: openacs-4/packages/dotlrn/www/admin/password-update.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/password-update.tcl,v diff -u -r1.4 -r1.4.8.1 --- openacs-4/packages/dotlrn/www/admin/password-update.tcl 8 Aug 2006 21:26:28 -0000 1.4 +++ openacs-4/packages/dotlrn/www/admin/password-update.tcl 18 Aug 2014 19:22:03 -0000 1.4.8.1 @@ -4,7 +4,7 @@ @version $Id$ } { - {user_id:integer} + {user_id:naturalnum,notnull} {return_url ""} {password_old ""} } -validate { Index: openacs-4/packages/dotlrn/www/admin/term-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/term-edit.tcl,v diff -u -r1.12 -r1.12.6.1 --- openacs-4/packages/dotlrn/www/admin/term-edit.tcl 15 May 2007 20:14:25 -0000 1.12 +++ openacs-4/packages/dotlrn/www/admin/term-edit.tcl 18 Aug 2014 19:22:04 -0000 1.12.6.1 @@ -25,7 +25,7 @@ @version $Id$ } -query { - term_id:integer,notnull + term_id:naturalnum,notnull } -properties { context_bar:onevalue } Index: openacs-4/packages/dotlrn/www/admin/term.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/term.tcl,v diff -u -r1.17 -r1.17.2.1 --- openacs-4/packages/dotlrn/www/admin/term.tcl 1 Nov 2013 21:08:33 -0000 1.17 +++ openacs-4/packages/dotlrn/www/admin/term.tcl 18 Aug 2014 19:22:04 -0000 1.17.2.1 @@ -21,10 +21,10 @@ @creation-date 2002-03-07 @version $Id$ } -query { - term_id:integer,notnull + term_id:naturalnum,notnull {department_key ""} {orderby "department_name,asc"} - page:optional + page:naturalnum,optional {keyword ""} } -properties { classes:multirow Index: openacs-4/packages/dotlrn/www/admin/terms.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/terms.tcl,v diff -u -r1.8 -r1.8.8.1 --- openacs-4/packages/dotlrn/www/admin/terms.tcl 8 Aug 2006 21:26:28 -0000 1.8 +++ openacs-4/packages/dotlrn/www/admin/terms.tcl 18 Aug 2014 19:22:04 -0000 1.8.8.1 @@ -21,7 +21,7 @@ @creation-date Dec 13, 2001 @version $Id$ } -query { - page:optional + page:naturalnum,optional {orderby "start_date_pretty,desc"} } -properties { context_bar:onevalue Index: openacs-4/packages/dotlrn/www/admin/user-nuke.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user-nuke.tcl,v diff -u -r1.6 -r1.6.2.1 --- openacs-4/packages/dotlrn/www/admin/user-nuke.tcl 1 Nov 2013 21:08:34 -0000 1.6 +++ openacs-4/packages/dotlrn/www/admin/user-nuke.tcl 18 Aug 2014 19:22:04 -0000 1.6.2.1 @@ -6,7 +6,7 @@ @creation-date 2002-08-08 @version $Id$ } { - user_id:integer,notnull + user_id:naturalnum,notnull {referer "[dotlrn::get_admin_url]/users"} } Index: openacs-4/packages/dotlrn/www/admin/user.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/user.tcl,v diff -u -r1.28 -r1.28.2.1 --- openacs-4/packages/dotlrn/www/admin/user.tcl 1 Nov 2013 21:08:34 -0000 1.28 +++ openacs-4/packages/dotlrn/www/admin/user.tcl 18 Aug 2014 19:22:04 -0000 1.28.2.1 @@ -21,7 +21,7 @@ @creation-date 2002-03-13 @version $Id$ } { - user_id:integer,notnull + user_id:naturalnum,notnull } -properties { context:onevalue first_names:onevalue