Index: openacs-4/packages/dotlrn-homework/www/file-copy-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-copy-2.tcl,v diff -u -N -r1.2.18.3 -r1.2.18.4 --- openacs-4/packages/dotlrn-homework/www/file-copy-2.tcl 18 Aug 2014 21:58:07 -0000 1.2.18.3 +++ openacs-4/packages/dotlrn-homework/www/file-copy-2.tcl 23 Aug 2014 13:01:26 -0000 1.2.18.4 @@ -5,8 +5,8 @@ @creation-date 14 Nov 2000 @cvs-id $Id$ } { - file_id:naturalnum,notnull - parent_id:naturalnum,notnull + file_id:integer,notnull + parent_id:integer,notnull } -validate { valid_file -requires {file_id} { if {![fs_file_p $file_id]} { Index: openacs-4/packages/dotlrn-homework/www/file-copy.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-copy.tcl,v diff -u -N -r1.3.12.3 -r1.3.12.4 --- openacs-4/packages/dotlrn-homework/www/file-copy.tcl 18 Aug 2014 21:58:07 -0000 1.3.12.3 +++ openacs-4/packages/dotlrn-homework/www/file-copy.tcl 23 Aug 2014 13:01:26 -0000 1.3.12.4 @@ -5,7 +5,7 @@ @creation-date 14 Nov 2000 @cvs-id $Id$ } { - file_id:naturalnum,notnull + file_id:integer,notnull } -validate { valid_file -requires {file_id} { if {![fs_file_p $file_id]} { Index: openacs-4/packages/dotlrn-homework/www/file-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-delete.tcl,v diff -u -N -r1.4.12.3 -r1.4.12.4 --- openacs-4/packages/dotlrn-homework/www/file-delete.tcl 18 Aug 2014 21:58:07 -0000 1.4.12.3 +++ openacs-4/packages/dotlrn-homework/www/file-delete.tcl 23 Aug 2014 13:01:26 -0000 1.4.12.4 @@ -5,7 +5,7 @@ @creation-date 10 Nov 2000 @cvs-id $Id$ } { - file_id:naturalnum,notnull + file_id:integer,notnull {confirmed_p "f"} } -validate { valid_file -requires {file_id} { Index: openacs-4/packages/dotlrn-homework/www/file-move-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-move-2.tcl,v diff -u -N -r1.3.12.3 -r1.3.12.4 --- openacs-4/packages/dotlrn-homework/www/file-move-2.tcl 18 Aug 2014 21:58:07 -0000 1.3.12.3 +++ openacs-4/packages/dotlrn-homework/www/file-move-2.tcl 23 Aug 2014 13:01:26 -0000 1.3.12.4 @@ -5,8 +5,8 @@ @creation-date 13 Nov 2000 @cvs-id $Id$ } { - file_id:naturalnum,notnull - parent_id:naturalnum,notnull + file_id:integer,notnull + parent_id:integer,notnull } -validate { valid_file -requires {file_id} { if {![fs_file_p $file_id]} { Index: openacs-4/packages/dotlrn-homework/www/file-move.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file-move.tcl,v diff -u -N -r1.2.18.3 -r1.2.18.4 --- openacs-4/packages/dotlrn-homework/www/file-move.tcl 18 Aug 2014 21:58:07 -0000 1.2.18.3 +++ openacs-4/packages/dotlrn-homework/www/file-move.tcl 23 Aug 2014 13:01:26 -0000 1.2.18.4 @@ -6,7 +6,7 @@ @creation-date 13 Nov 2000 @cvs-id $Id$ } { - file_id:naturalnum,notnull + file_id:integer,notnull name:notnull } -validate { valid_file -requires {file_id} { Index: openacs-4/packages/dotlrn-homework/www/file.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/file.tcl,v diff -u -N -r1.4.12.3 -r1.4.12.4 --- openacs-4/packages/dotlrn-homework/www/file.tcl 18 Aug 2014 21:58:08 -0000 1.4.12.3 +++ openacs-4/packages/dotlrn-homework/www/file.tcl 23 Aug 2014 13:01:26 -0000 1.4.12.4 @@ -10,8 +10,8 @@ @author Don Baccus (dhogaza@pacifier.com) } { - file_id:naturalnum,notnull - folder_id:naturalnum,notnull + file_id:integer,notnull + folder_id:integer,notnull {show_all_versions_p "f"} } -validate { valid_file -requires {file_id} { Index: openacs-4/packages/dotlrn-homework/www/folder-contents.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/folder-contents.tcl,v diff -u -N -r1.4.12.2 -r1.4.12.3 --- openacs-4/packages/dotlrn-homework/www/folder-contents.tcl 18 Aug 2014 21:58:08 -0000 1.4.12.2 +++ openacs-4/packages/dotlrn-homework/www/folder-contents.tcl 23 Aug 2014 13:01:26 -0000 1.4.12.3 @@ -5,7 +5,7 @@ @author Don Baccus (dhogaza@pacifier.com) } { - folder_id:naturalnum,notnull + folder_id:integer,notnull {min_level:integer ""} {max_level:integer ""} } -validate { Index: openacs-4/packages/dotlrn-homework/www/folder-create.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/folder-create.tcl,v diff -u -N -r1.3.12.3 -r1.3.12.4 --- openacs-4/packages/dotlrn-homework/www/folder-create.tcl 18 Aug 2014 21:58:08 -0000 1.3.12.3 +++ openacs-4/packages/dotlrn-homework/www/folder-create.tcl 23 Aug 2014 13:01:27 -0000 1.3.12.4 @@ -6,7 +6,7 @@ @creation-date 7 Nov 2000 @cvs-id $Id$ } { - parent_id:naturalnum,notnull + parent_id:integer,notnull return_url:notnull } -validate { valid_folder -requires {parent_id:integer} { Index: openacs-4/packages/dotlrn-homework/www/folder-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/folder-delete.tcl,v diff -u -N -r1.3.12.3 -r1.3.12.4 --- openacs-4/packages/dotlrn-homework/www/folder-delete.tcl 18 Aug 2014 21:58:08 -0000 1.3.12.3 +++ openacs-4/packages/dotlrn-homework/www/folder-delete.tcl 23 Aug 2014 13:01:27 -0000 1.3.12.4 @@ -7,7 +7,7 @@ @creation-date 10 November 2000 @cvs-id $Id$ } { - folder_id:naturalnum,notnull + folder_id:integer,notnull {confirmed_p "f"} } -validate { valid_folder -requires {folder_id:integer} { Index: openacs-4/packages/dotlrn-homework/www/toggle-homework-alert.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/toggle-homework-alert.tcl,v diff -u -N -r1.3.18.3 -r1.3.18.4 --- openacs-4/packages/dotlrn-homework/www/toggle-homework-alert.tcl 18 Aug 2014 21:58:08 -0000 1.3.18.3 +++ openacs-4/packages/dotlrn-homework/www/toggle-homework-alert.tcl 23 Aug 2014 13:01:27 -0000 1.3.18.4 @@ -9,9 +9,9 @@ @creation-date 2002-07-25 @cvs-id $Id$ } { - folder_id:naturalnum,notnull - request_id:naturalnum,notnull - type_id:naturalnum,notnull + folder_id:integer,notnull + request_id:integer + type_id:integer,notnull subscribe_p:boolean,notnull return_url:notnull } -validate { Index: openacs-4/packages/dotlrn-homework/www/version-add.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/version-add.tcl,v diff -u -N -r1.4.6.3 -r1.4.6.4 --- openacs-4/packages/dotlrn-homework/www/version-add.tcl 18 Aug 2014 21:58:08 -0000 1.4.6.3 +++ openacs-4/packages/dotlrn-homework/www/version-add.tcl 23 Aug 2014 13:01:27 -0000 1.4.6.4 @@ -5,8 +5,8 @@ Don Baccus (dhogaza@pacifier.com) } { - file_id:naturalnum,notnull - folder_id:naturalnum,notnull + file_id:integer,notnull + folder_id:integer,notnull name:notnull return_url:notnull } -validate { Index: openacs-4/packages/dotlrn-homework/www/version-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-homework/www/version-delete.tcl,v diff -u -N -r1.4.12.3 -r1.4.12.4 --- openacs-4/packages/dotlrn-homework/www/version-delete.tcl 18 Aug 2014 21:58:08 -0000 1.4.12.3 +++ openacs-4/packages/dotlrn-homework/www/version-delete.tcl 23 Aug 2014 13:01:27 -0000 1.4.12.4 @@ -5,7 +5,7 @@ @creation-date 10 November 2000 @cvs-id $Id$ } { - version_id:naturalnum,notnull + version_id:integer,notnull {confirmed_p "f"} } -validate { valid_version -requires {version_id} {