Index: openacs-4/packages/assessment/lib/feedback.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/feedback.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/assessment/lib/feedback.tcl	21 Jan 2008 20:25:35 -0000	1.8
+++ openacs-4/packages/assessment/lib/feedback.tcl	27 Oct 2014 16:40:55 -0000	1.9
@@ -9,9 +9,9 @@
     @arch-tag: 36842c7c-99fa-4d71-904c-814bc3fde60c
     @cvs-id $Id$
 } {
-    assessment_id
-    session_id
-    section_id
+    assessment_id:naturalnum,notnull
+    session_id:naturalnum,notnull
+    section_id:naturalnum,notnull
     {return_p 0}
     section_order:optional
     item_order:optional
@@ -32,7 +32,7 @@
 #}
 
 if { $next_url eq "" } {
-    if { $return_p && [exists_and_not_null return_url] } {
+    if { $return_p && ([info exists return_url] && $return_url ne "") } {
 	set next_url $return_url
 	
     } else {