Index: openacs-4/packages/assessment/www/asm-admin/item-add-sa.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/item-add-sa.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/assessment/www/asm-admin/item-add-sa.tcl	12 Jun 2006 02:49:51 -0000	1.5
+++ openacs-4/packages/assessment/www/asm-admin/item-add-sa.tcl	27 Oct 2014 16:41:01 -0000	1.6
@@ -4,9 +4,9 @@
     @author Timo Hentschel (timo@timohentschel.de)
     @cvs-id $Id:
 } {
-    assessment_id:integer
-    section_id:integer
-    as_item_id:integer
+    assessment_id:naturalnum,notnull
+    section_id:naturalnum,notnull
+    as_item_id:naturalnum,notnull
     after:integer
 } -properties {
     context:onevalue
@@ -61,7 +61,7 @@
     set display_type "tb"
 } -edit_data {
     db_transaction {
-	if {![db_0or1row item_type {}] || $object_type != "as_item_type_sa"} {
+	if {![db_0or1row item_type {}] || $object_type ne "as_item_type_sa"} {
 	    set as_item_type_id [as::item_type_sa::new \
 				     -title $title \
 				     -increasing_p $increasing_p \