Index: openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl,v
diff -u -r1.17.2.1 -r1.17.2.2
--- openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl	10 Sep 2015 08:28:10 -0000	1.17.2.1
+++ openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl	26 Jan 2017 09:30:44 -0000	1.17.2.2
@@ -7,7 +7,7 @@
     @creation-date Oct 2004
     @cvs_id $Id$
 } {
-    {page_num 0}
+    {page_num:naturalnum,notnull 0}
 } -properties {
 }
 
Index: openacs-4/packages/new-portal/www/admin/portal-show.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/new-portal/www/admin/portal-show.tcl,v
diff -u -r1.6.24.1 -r1.6.24.2
--- openacs-4/packages/new-portal/www/admin/portal-show.tcl	12 Sep 2015 11:06:40 -0000	1.6.24.1
+++ openacs-4/packages/new-portal/www/admin/portal-show.tcl	26 Jan 2017 09:30:44 -0000	1.6.24.2
@@ -25,10 +25,10 @@
 } {
     {referer:notnull}
     portal_id:naturalnum,notnull
-    {page_num 0}
+    {page_num:naturalnum,notnull 0}
 }
 
-set name "[portal::get_name $portal_id]"
+set name [portal::get_name $portal_id]
 set html "[portal::navbar -portal_id $portal_id] [portal::render -page_num $page_num $portal_id]"